# NOT RUN {
run <- MplusAutomation::mplusAvailable() == 0
m1 <- "
IRT:
attitude BY Comfort, Work, Future, Benefit;
Class:
GRM
"
model1 <- irtree_model(m1)
data(Science, package = "mirt")
fit1 <- fit(model1, Science, engine = "mplus",
control = control_mplus(run = run))
# }
Run the code above in your browser using DataLab