Last chance! 50% off unlimited learning
Sale ends in
Score test, also knowned as Lagrange multiplier tests
scoretest(x, y, ...)# S3 method for micsr
scoretest(x, y, ..., vcov = NULL)
an object of class "htest".
the first model,
the second model
further arguments
omit a character containing the effects that are removed from the test
Yves Croissant
mode_choice <- mode_choice %>%
mutate(cost = cost * 8.42,
gcost = (ivtime + ovtime) * 8 + cost)
pbt_unconst <- binomreg(mode ~ cost + ivtime + ovtime, data = mode_choice, link = "probit")
pbt_const <- binomreg(mode ~ gcost, data = mode_choice, link = "logit")
scoretest(pbt_const , . ~ . + ivtime + ovtime)
Run the code above in your browser using DataLab