Adding fit continuous R backend code