在R中用mediation包做中介分析。自变量DII_group是根据四分位数得出的四分类变量,中介变量slepe_pattern是离散型变量(范围0-5),结局变量为二元变量。自变量和中介变量与因变量都有关系。在做因果分析时(图一),调整中介变量后,自变量和中介变量和因变量的关系都显著,但在做中介分析时,P虽然都<0.05,但效应值也都变得很小,请问这是为什么啊??整理结果时要保留五位小数才能看出来β值。这样的话可以说存在中介效应吗?
这是y~x+M
fit4<-glm(suicide_ideation ~ DII_group + + sleep_pattern + age + sex + living_alone + TDI +
income + education + employment + thing + ethnic + mental + BMI +
PA + alcohol + smoking ,
data = data, family = binomial)
summary(fit4)
得到的结果

中介分析的结果
a<-lm(sleep_pattern ~ DII_group + age + sex + living_alone + TDI +
income + education + employment + thing + ethnic + mental + BMI +
PA + alcohol + smoking,
data = data ) #lm(M~X)
b<-glm(suicide_ideation ~ sleep_pattern + DII_group + age + sex + living_alone + TDI +
income + education + employment + thing + ethnic + mental + BMI +
PA + alcohol + smoking,
data = data, family = binomial) #glm(Y~X+M)
library(mediation)
set.seed(123)
result = mediate(a,b,treat="DII_group",mediator = "sleep_pattern",sims = 1000, boot = T)
summary(result)
