# \donttest{
# note: iter = 250 for demonstrative purposes
# data
Y <- bfi
Y <- subset(Y, select = c("A1", "A2",
"gender", "education"))
fit_mv_ordinal <- estimate(Y, formula = ~ gender + as.factor(education),
type = "continuous",
iter = 250,
progress = TRUE)
regression_summary(fit_mv_ordinal)
# }
Run the code above in your browser using DataLab