# \donttest{
data("ids_data")
mydata_BB_y14 <- shape_data(
data = ids_data,
age_name = "age",
score_name = "y14",
family = "BB"
)
mod_BB_y14 <- fb_select(
data = mydata_BB_y14,
age_name = "age",
score_name = "shaped_score",
family = "BB",
selcrit = "BIC"
)
centiles_bin(mod_BB_y14, xvar = age)
# }
Run the code above in your browser using DataLab