[r] Error in model.frame.default: variable lengths differ