# NOT RUN {
if (requireNamespace("gamlss", quietly = TRUE) &&
requireNamespace("gamlss.data", quietly = TRUE)) {
data(abdom, package="gamlss.data")
# }
# NOT RUN {
mod <- gamlss(y~pb(x), sigma.fo=~pb(x), family=BCT,
data=abdom, method=mixed(1,20))
# }
# NOT RUN {
## load stored object
mod <- readRDS(system.file("extdata", "gamlss_example.rds",
package="broom.mixed"))
tidy(mod)
}
# }
Run the code above in your browser using DataCamp Workspace