# NOT RUN {
mdl <- model_summary(model.fit = usemmodelfit,
var.number = 3,
lag.order = 1)
mdl$beta
mdl$beta.se
mdl$psi
mdl$cfi
mdl$tli
mdl$rmsea
mdl$srmr
# }
# NOT RUN {
# }
Run the code above in your browser using DataCamp Workspace