НачатьНачать бесплатно

Проверка дисперсии модели

Чтобы оценить трёхфакторную модель для набора данных epi, можно проанализировать дисперсию наблюдаемых переменных и выявить возможные проблемы с моделью. Очень большие значения дисперсии могут сигнализировать о проблемах, однако их следует сравнивать с исходным масштабом данных.

Применим функцию var() к переменной V1, чтобы сравнить дисперсию исходной наблюдаемой переменной с оценочной дисперсией из сводного вывода модели. Библиотеки, модель и наборы данных уже загружены.

Это упражнение является частью курса

Структурное моделирование уравнений с lavaan в R

Посмотреть курс

Инструкции к упражнению

  • Используйте var() для переменной V1, чтобы вычислить дисперсию исходной наблюдаемой переменной в наборе данных epi.
  • Сравните полученное значение с оценкой дисперсии V1 в модели.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Run the model
epi.fit <- cfa(model = epi.model, data = epi)

# Examine the output 
summary(epi.fit, standardized = TRUE, fit.measures = TRUE)

# Calculate the variance of V1 in the epi data
___
Редактировать и запускать код