Fix the Latent Heywood Model
In the last exercise, you found that the adoption survey had a correlation > 1 on the latent variable. You should fix the Heywood case by collapsing the two latent variables into one latent variable. Then you should analyze and summarize the model to explore if merging these two factors into one has solved the problematic correlation.
Questo esercizio fa parte del corso
Structural Equation Modeling with lavaan in R
Istruzioni dell'esercizio
- Change the model to create only one
goodstoryfactor that is measured by all six manifest variables in theadoptsurveydataset. - Analyze the model with the
cfa()function to ensure there are no error messages. - Run the
summary()for the model to view the final model fit.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
# Look at the data
head(adoptsurvey)
# Edit the original model
adopt.model <- 'goodstory =~ pictures + background + loveskids
inperson =~ energy + wagstail + playful'
# Analyze the model
adopt.fit <- cfa(model = ___, data = adoptsurvey)
# Look for Heywood cases
summary(___, standardized = TRUE, fit.measures = TRUE)