Я пытаюсь провести подтверждающий факторный анализ на лаване по шкале вопросника Ориентации на социальное доминирование (SDO), повторяя прошлые исследования, проведенные при разработке шкалы. Однако модели не сходятся, и я не знаю почему. Это дает мне следующую ошибку:
Warning message:
In lav_model_estimate(lavmodel = lavmodel, lavpartable = lavpartable, :
lavaan WARNING: the optimizer warns that a solution has NOT been found!
>
> summary(fit_SDO, standardized=T,fit.measures=F,rsq=T)
lavaan 0.6-5 did NOT end normally after 3065 iterations
** WARNING ** Estimates below are most likely unreliable
Модель, которую я пытаюсь подобрать, включает четыре фактора. Первые два - это доминирование и антиэгалитаризм, и, кроме того, элементы этих подшкал должны иметь вторичную нагрузку либо на фактор, влияющий на черту (элементы, изначально представленные как более высокие значения = более высокий SDO), либо на фактор контраста (элементы, первоначально представленные как более высокое значение = более низкое SDO). Я прикрепил изображение, которое показывает, как должна выглядеть модель:
Модель, которую я пытаюсь запустить
Ниже представлена моя модель в R. Обратите внимание, что элементы доминирования и антиэгалитаризма также должны загружать сторонников или противников:
model_SDO <- '
Dominance =~ SDO7_1 + SDO7_2 + SDO7_3 + SDO7_4 +SDO7_5 + SDO7_6 + SDO7_7 + SDO7_8
AntiEgalitarianism =~ SDO7_9 + SDO7_10 + SDO7_11 + SDO7_12 + SDO7_13 + SDO7_14 + SDO7_15 + SDO7_16
Pro =~ SDO7_1 + SDO7_2 + SDO7_3 + SDO7_4 +SDO7_9 + SDO7_10 + SDO7_11 + SDO7_12
Con =~ SDO7_5 + SDO7_6 + SDO7_7 + SDO7_8 + SDO7_13 + SDO7_14 + SDO7_15 + SDO7_16
'
fit_SDO <- cfa(model_SDO, data = data_all)
summary(fit_SDO, standardized=T,fit.measures=F,rsq=T)
Есть идеи, в чем проблема? Есть ли какой-то другой способ написать модель, чтобы она сходилась и при этом сохранила факторную структуру, представленную на прикрепленном изображении?
Большое спасибо за Вашу помощь!