Анализ политической демократии
В этом заключительном упражнении вы объедините все шаги, выполненные при построении однофакторной модели. Вы изучите стандартизированные нагрузки и индексы подгонки для модели политической демократии. Модель была оценена с помощью функции cfa(). Теперь воспользуйтесь функцией summary() с аргументами standardized и fit.measures, чтобы просмотреть все результаты вместе.
В столбце Std.all для нагрузок вы обнаружите, что показатели близки к единице — это говорит о том, что индикаторы хорошо измеряют концепцию политической демократии. Однако при анализе индексов подгонки вы увидите смешанные результаты: одни значения будут удовлетворительными, другие — нет. Такая картина встречается довольно часто и свидетельствует о том, что модель в целом соответствует данным, но имеет резервы для улучшения.
Это упражнение является частью курса
Структурное моделирование уравнений с lavaan в R
Инструкции к упражнению
- Примените функцию
summary()к моделиpolitics.fit. - Укажите аргументы для отображения стандартизированных нагрузок и индексов подгонки.
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
# Load the lavaan library
library(lavaan)
# Load the data and define model
data(PoliticalDemocracy)
politics.model <- 'poldemo60 =~ y1 + y2 + y3 + y4'
# Analyze the model with cfa()
politics.fit <- cfa(model = politics.model, data = PoliticalDemocracy)
# Summarize the model