R语言使用psych包里的mediate做中介分析报错，请问是哪里的问题

Question

我的R语言mediation包里没有mediate，所以使用psych包里的mediate做中介分析，结果一直报错。

```r
library(psych)
b<-lm(xiaoneng~suyang+health+age+BMI+yimiao,data=R3)
#"xiaoneng"中介变量，"suyang"因变量均为为连续变量；
c<-glm(jieju~xiaoneng+suyang+health+age+BMI+yimiao,data=R3)
#"jieju"结局变量，为二分类变量。
contcont<-mediate(b,c,treat="suyang",mediator="xiaoneng",robustSE=TRUE,sims=100,boot=T)
Error in mediate(b, c, treat = "suyang", mediator = "xiaoneng", robustSE = TRUE,  : 
  unused arguments (treat = "suyang", mediator = "xiaoneng", robustSE = TRUE, sims = 100, boot = T)

```

Answer 1

基于Monster 组和GPT的调写：

• 在 psych 包中的 mediate 函数的参数列表中，没有 treat, mediator, robustSE, sims 和 boot 参数。因此，用 mediation 包来进行中介分析。 mediation 包中包含了适用于多种中介分析的函数，其中最常用的函数是 mediate()。

以下是可以尝试的代码：

library(mediation)
b <- lm(xiaoneng ~ suyang + health + age + BMI + yimiao, data = R3)
c <- glm(jieju ~ xiaoneng + suyang + health + age + BMI + yimiao, data = R3, family = binomial())
contcont <- mediate(b, c, treat = "suyang", mediator = "xiaoneng", boot = TRUE, sims = 1000, covs = c("health", "age", "BMI", "yimiao"), verbose = TRUE)

covs参数是用于指定调节变量的向量。verbose 参数将输出更详细的结果信息。注意，由于结果变量 jieju 是一个二分类变量，因此要用逻辑回归（glm() 函数）来拟合模型，而不是使用线性回归（lm() 函数）。