Update logit.R