# NOT RUN {
# feel free to ignore the following line<U+2014>it allows {broom} to supply
# examples without requiring the model-supplying package to be installed.
if (requireNamespace("MASS", quietly = TRUE)) {
# load libraries for models and data
library(MASS)
# fit model
r <- glm.nb(Days ~ Sex/(Age + Eth*Lrn), data = quine)
# summarize model fit with tidiers
tidy(r)
glance(r)
}
# }
Run the code above in your browser using DataLab