How can I fix a hierarquical CFA with only two first-order factors (with 3 or more first-order factors it works fine).
cfa_H <- 'factorWM =~ Pitem1 + Pitem3 + Pitem6 + Pitem7 + Pitem9 + Pitem19 + Pitem21 + Pitem23 + Pitem24 + Pitem12 + Pitem14 + Pitem17 + Pitem20
factorINH =~ Pitem2 + Pitem4 + Pitem8 + Pitem11 + Pitem15 + Pitem5 + Pitem10 + Pitem13 + Pitem16 + Pitem18 + Pitem22
FG =~ factorWM + factorINH '
model_H <- cfa(model = cfa_H,
data = AAA,
ordered = TRUE,
estimator = "WLSMV",
missing = "pairwise")
summary(model_H, standardized = TRUE, fit.measures = TRUE, rsquare = TRUE)