control_logistic function

Control function for logistic regression model fitting