R:`[.data.frame`（y.data，treat）中出错：选择了未定义的列-正在运行中介包

我正在查看AUDITCEN-->INTERN通过W1_cesd进行的调解

AUDITCEN和INTERN之间的关系是四元的，但AUDITCEN和W1_cesd之间的关系是线性的。我认为这给我带来了问题

我正在跑步：

dyad_id <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
INTERN <- c(4, 3, 4, 2, 2, 6, 8, 6, 9, 9)
AUDITCEN <- c(5.9, -6.1, -9.1, -5.1, -7.1, -6.1, 0.9, -2.1, -7.1, 1.9)
W1_cesd <- c(25, 8, 5, 0, 5, 17, 10, 5, 5, 7)
GENDERKID<- c(0, 0, 1, 1, 0, 1, 1, 0, 1, 0)
C_AGE_DI <- c(0, 0, 1, 1, 0, 0, 0, 0, 0, 1)
RACE_W <- c(0, 1, 1, 1, 1, 1, 1, 1, 1, 1)
RACE_O <- c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
cesd <- data.frame(dyad_id, INTERN, AUDITCEN, W1_cesd, GENDERKID, C_AGE_DI, RACE_W, RACE_O)

library(mediation)
med.fit <-glm(W1_cesd ~ AUDITCEN + GENDERKID + C_AGE_DI + RACE_W + RACE_O, data=cesd )

out.fit <-glm(INTERN ~ W1_cesd+ poly(AUDITCEN, 2) + GENDERKID + C_AGE_DI + RACE_W + RACE_O, data=cesd )

results <-mediate(med.fit, out.fit, sims = 1000, boot = TRUE, treat = "AUDITCEN", control.value=-10, treat.value=0, mediator = "W1_cesd")

---

我的治疗变量确实存在，而且两个模型看起来都很好。出了什么问题？当我为我的exp out关系指定二次关联时，我是否做错了什么事？

请提供一个自包含的示例代码。什么包是

mediate

的来源？它似乎不是基本包的一部分…@rmango我已更新了e问题-apologies@Z.Lin这是调解程序包。问题已更新。很抱歉造成混淆。请提供一个自包含的示例代码。调解程序包是来自哪个程序包的？

mediate

？它似乎不是基本程序包的一部分…@rmango我已更新问题-apologies@Z.Lin这是调解方案。问题是h已更新。很抱歉造成混淆。

Error in `[.data.frame`(y.data, , treat) : undefined columns selected