sempathsに直接パスが表示されないlavaanメディエータモデルのプロット

Question

次のメディエーションモデルはlavaan tutorialに由来します。 以下はsemPlotパッケージのsemPathsを使用してモデル構造を印刷しました。しかし、1つのパスが欠落しているように見えます。

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を使用してモデルをプロットは、3つのだけの回帰経路の二つのディスプレイ。 X→Yパスは表示されません。

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

これは私が不足しているパスを追加することができますどのようにあるか、なぜ誰かが説明できますか？

Answer 1

はこれを試してみて、それが

semPaths（フィット、タイトル= FALSE、レイアウト= "春"、whatLabelsは= "STD"、インターセプト= FALSE、スタイル= "ラム"）

を助けなら、私に知らせて