1

以下中介模型来自lavaan 教程。下面我打印了使用包中的模型semPaths结构semPlot。但似乎缺少一条路径。

set.seed(1234)
X <- rnorm(100)
M <- 0.5*X + rnorm(100)
Y <- 0.7*M + rnorm(100)
Data <- data.frame(X = X, Y = Y, M = M)
model <- ' # direct effect
             Y ~ c*X
           # mediator
             M ~ a*X
             Y ~ b*M
           # indirect effect (a*b)
             ab := a*b
           # total effect
             total := c + (a*b)
         '
fit <- sem(model, data = Data)
summary(fit, standardized=TRUE)

结果的回归部分为:

Regressions:
                   Estimate  Std.Err  Z-value  P(>|z|)   Std.lv  Std.all
  Y ~                                                                   
    X          (c)    0.036    0.104    0.348    0.728    0.036    0.028
  M ~                                                                   
    X          (a)    0.474    0.103    4.613    0.000    0.474    0.419
  Y ~                                                                   
    M          (b)    0.788    0.092    8.539    0.000    0.788    0.679

绘制模型semPaths仅使用显示三个回归路径中的两个。X -> Y 路径不显示。

semPaths(fit, "std", edge.label.cex = 0.71)

在此处输入图像描述

有人可以解释为什么会这样或如何添加缺少的路径吗?

4

1 回答 1

0

试试这个,让我知道它是否有帮助

semPaths(fit, title = FALSE,layout = "spring", whatLabels = "std", intercepts = FALSE, style = "ram")

于 2016-06-08T22:38:04.613 回答