data(HS20imps) # import a list of 20 imputed data sets
## specify CFA model from lavaan's ?cfa help page
HS.model <- '
visual =~ x1 + x2 + x3
textual =~ x4 + x5 + x6
speed =~ x7 + x8 + x9
'
## fit model to 20 imputed data sets
fit <- cfa.mi(HS.model, data = HS20imps)
standardizedSolution.mi(fit) # default: type = "std.all"
## only standardize latent variables:
standardizedSolution.mi(fit, type = "std.lv",
output = "text") # display like summary()
Run the code above in your browser using DataLab