Исправление случая Хейвуда для латентной переменной
В предыдущем упражнении вы обнаружили, что в опросе об усыновлении корреляция для латентной переменной превысила 1. Чтобы устранить случай Хейвуда, объедините две латентные переменные в одну. Затем проанализируйте модель и изучите её сводку — это позволит проверить, решило ли объединение двух факторов проблему с корреляцией.
Это упражнение является частью курса
Структурное моделирование уравнений с lavaan в R
Инструкции к упражнению
- Измените модель так, чтобы в ней был только один фактор
goodstory, который измеряется всеми шестью наблюдаемыми переменными из набора данныхadoptsurvey. - Проанализируйте модель с помощью функции
cfa()и убедитесь, что сообщений об ошибках нет. - Запустите
summary()для модели, чтобы просмотреть итоговое качество подгонки.
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
# 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)