R中的多重中介分析

我想知道是否有人知道在 R 中運行多個中介模型的方法。我知道中介包允許多個簡單的中介模型，但我想運行一個同時評估多個中介模型的模型。

我假設我可以在 SEM 框架（路徑分析）中做到這一點，但想知道是否有任何新的軟件包可以計算多個中介的中介分析的典型統計數據（間接效應、通過中介的總效應比例等），並且可以利用自舉。我知道這是一個長遠的目標，但我認為在投入時間從頭開始開發之前我應該問一下。

更新：（2013 年 11 月 11 日）

自從幾年前提出這個問題以來，我已經學會了使用美妙的 R 包 lavaan 來做多重中介。

這是示例代碼：

model <- '
# outcome model 
outcomeVar ~ c*xVar + b1*medVar1 + b2*medVar2

# mediator models
medVar1 ~ a1*xVar 
medVar2 ~ a2*xVar

# indirect effects (IDE)
medVar1IDE := a1*b1
medVar2IDE := a2*b2
sumIDE := (a1*b1) + (a2*b2)

# total effect
total := c + (a1*b1) + (a2*b2)
medVar1 ~~ medVar2 # model correlation between mediators
'

請注意，a1、a2、b1、b2 和 c 是標籤。然後運行模型：

fit <- sem(model, data=dataframe)

並查看輸出：

summary(fit, fit.measures=TRUE, standardize=TRUE, rsquare=TRUE)

最後，生成引導置信區間：

boot.fit <- parameterEstimates(fit, boot.ci.type="bca.simple")

有關詳細信息，請參閱 lavaan 網站：http: //lavaan.ugent.be/

lavaan 包是 SEM 的 R 包。您可以使用它來檢驗多重中介假設，並且有自舉。

引用自：https://stats.stackexchange.com/questions/19599