# NOT RUN {
bwt.glm <- glm(low ~ lwtkg + age + smoke + ftv, data=birthwt, family="binomial")
newdata <- data.frame(lwtkg=1, age=60, smoke=0, ftv="2+")
newdata_to_X(newdata, bwt.glm)
## See the Cox regression section of the main package vignette for another example.
# }
Run the code above in your browser using DataLab