0

我遇到了一条错误消息：

varEst[targetcol, targetcol] 中的错误：下标越界

当试图用semTools函数探测潜在的交互效应时。Google 群组（ https://groups.google.com/g/lavaan/c/Vs7d59p-Czc ）上似乎对此主题进行了讨论，但无论如何我都无法解决该错误。

我的代码：

model <- 'bdis =~ BD1 + BD2 + BD3 + BD6 + BD8 
                  BD6~~BD8
          exp1 =~ EXP
          inter =~ INTER1 + INTER2 + INTER3 + INTER4 + INTER5
          int =~ EXP.INTER1 + EXP.INTER2 + EXP.INTER3 + EXP.INTER4 + EXP.INTER5
                 EXP.INTER1 ~~ EXP.INTER2
                 EXP.INTER1 ~~ EXP.INTER3
                 EXP.INTER1 ~~ EXP.INTER4
                 EXP.INTER1 ~~ EXP.INTER5
                 EXP.INTER2 ~~ EXP.INTER3
                 EXP.INTER2 ~~ EXP.INTER4
                 EXP.INTER2 ~~ EXP.INTER5
                 EXP.INTER3 ~~ EXP.INTER4
                 EXP.INTER3 ~~ EXP.INTER5
                 EXP.INTER4 ~~ EXP.INTER5
            
          
          bmi1 =~ BMI
          IG1 =~ IG
          dep =~ DEP1 + DEP2 + DEP3 + DEP4
          
          
          bdis ~  exp1 + inter + int + bmi1 + IG1 + dep'

fit <- sem(model, data = datasint, estimator = "MLR", missing = "ML", meanstructure = TRUE, group = "GIRL", std.lv = TRUE)
summary(fit, fit.measures = TRUE, standardized = TRUE)

probe2WayMC(fit, nameX = c("exp1", "int", "inter"), nameY = "bdis",
            modVar = "int", valProbe = c(-1, 0, 1), group=1)
4

0 回答 0