使用“中介”库的因果中介

Question

我是新手，所以请原谅我的无能。 我正在尝试使用“调解”库进行因果调解。 我有两个问题。

1. 我知道结果应该是一个比例，但我得到的是整数，所以我不确定这是怎么发生的，它意味着什么，或者如何处理它。

2. 所有输出均为负数。我可以从之前的问题中看到，如果一个输出是负数，这有助于解释发生了什么。但如果两者都是负数呢？

感谢您的帮助。

下面是代码和输出。

> set.seed(123)
> med.fit<-lm(FCItotal ~ Group + AgeYearsChecked + Sex, data = gtrF)
> out.fit <-lm(HHSTotal ~ FCItotal + Group + AgeYearsChecked + Sex, data = gtrF)
> med.FCI<-mediate(med.fit, out.fit, treat="Group", mediator="FCItotal", robustSE=TRUE, sims=1000)
> summary(med.FCI)

Causal Mediation Analysis 

Quasi-Bayesian Confidence Intervals

               Estimate 95% CI Lower 95% CI Upper p-value    
ACME            -3.7338      -9.5643         1.08    0.12    
ADE             -9.7899     -16.1793        -3.29  <2e-16 ***
Total Effect   -13.5236     -19.3789        -7.75  <2e-16 ***
Prop. Mediated   0.2659      -0.0818         0.68    0.12    
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

Sample Size Used: 65 


Simulations: 1000 

Answer 1

天哪，我有点尴尬。我可以看到我唯一的问题是误读了数据表。 Prop. Mediated 是我所追求的数字，而不是整数。