1

我正在使用一维问卷中的验证性因子分析,我想生成一个 SEM 图。然而,回答问卷的参与者精通两种语言,一组用语言 X 回答问卷,另一组用语言 Y 回答相同的问卷。我想创建一个显示两组参数的单一图。如本例所示:

具有两个独立组的一维模型

我只能使用 R 创建单独的图:

library(lavaan)
library(semPlot)

#data
GrupoX <- data[data$language == 1,25:34]
GrupoY <- data[data$language == 2,25:34]

#fitting
modelX <- " f1  =~ Item1 + Item2 + Item3 + Item4 + Item5 + Item6 + Item7 + Item8 + Item9 + Item10"
fitX <- lavaan(modelX, data = GrupoX, auto.var = TRUE, auto.fix.first=TRUE, auto.cov.lv.x=TRUE, estimator="ML")
modelY <- " f1  =~ Item1 + Item2 + Item3 + Item4 + Item5 + Item6 + Item7 + Item8 + Item9 + Item10"
fitY <- lavaan(modelX, data = GrupoY, auto.var = TRUE, auto.fix.first=TRUE, auto.cov.lv.x=TRUE, estimator="ML")

#plots
semPaths(fitX, what = "std", residuals = FALSE, nCharNodes = 0, edge.label.cex = 1, legend=F, rotation=2)
semPaths(fitY, what = "std", residuals = FALSE, nCharNodes = 0, edge.label.cex = 1, legend=F, rotation=2)

有人可以帮助我如何使用每个组的信息创建一个情节吗?可能吗?

4

0 回答 0