Thanks for your help. I added
std.lv=TRUE but now I get a convergence error. Just to test, I tried the model with the default estimator and got the same convergence error message. Is this a sign that the data is a really poor fit for a single higher order factor? I ask because the data fit nicely for the three separate factors.
> leader.model2<-'
+ f1 =~ CARE1+CARE2+CARE3+CARE4+CARE5+
+ CARE6+CARE7+CARE8+CARE9+CARE10
+ f2 =~ COMP1+COMP2+COMP3+COMP4+COMP5+COMP6+COMP7+COMP8
+ f3 =~ TRUST1+TRUST2+TRUST3+TRUST4+TRUST5+TRUST6
+ f4 =~ f1+f2+f3
+ '
> fit2<-cfa(leader.model2, estimator="MLM", data=c_data,
std.lv=TRUE)
Warning message:
In lavaan(model = leader.model2, data = c_data,
std.lv = TRUE, estimator = "MLM", :
lavaan WARNING: model has NOT converged!
> summary(fit2, fit.measures=T)
** WARNING ** lavaan (0.5-12) did NOT converge after 949 iterations
** WARNING ** Estimates below are most likely unreliable