# NOT RUN {
data(attendance)
M.attendance <- glm.cmp(daysabs~ gender+math+prog, data=attendance)
model.matrix(M.attendance)
# }
# NOT RUN {
data(sitophilus)
M.sit <- glm.cmp(formula = ninsect ~ extract, formula_nu = ~extract, data = sitophilus)
model.matrix(M.sit)
# }
Run the code above in your browser using DataLab