2016-04-26 8 views
1

Следующая модель посредничества взята из lavaan tutorial. Ниже я напечатал структуру модели, используя semPaths из пакета semPlot. Но один путь, кажется, отсутствует.прямой путь не отображается в поле semPaths для модели лаванового медиатора

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) 

enter image description here

Может кто-нибудь объяснить, почему это так и как я могу добавить недостающий путь?

ответ

0

Попробуйте это и дайте мне знать, если это помогает

semPaths (FIT, название = FALSE, макет = "весна", whatLabels = "СТД", перехватывает = FALSE, стиль = "баран")

+0

Работы, я думаю :) Я отмечаю, что он уже работает, если я набираю: 'semPaths (fit, whatLabels =" std ", edge.label.cex = 0.71)'. @kylehamilton: Upvoted, но кто-то остановил его без видимых причин ... –

+0

эй, все хорошо, рад, что это сработало для вас! –