Ошибка «неиспользованные аргументы» в посредническом пакете R

Question

Я пытаюсь провести посреднический анализ моих данных диссертации. У меня есть переменная DV / исход (отношение 2), предсказываемая типом условия и отношением 1, плюс случайный эффект (число участников), опосредованный общим угнетением.

Я создал модель посредника (med.fit) и модель результата (out.fit) следующим образом:

med.fit <- lm(shared oppression ~ condition type + participant number) 
out.fit <- lm(attitudes2 ~ condition type + participant number + shared oppression

Затем я ввел это в пакет посредника согласно информации на Документация посреднического пакета R:

med.out<- (med.fit, out.fit, treat="condition type", mediator = "shared oppression", robustSE = TRUE, sims = 100)

Это приводит к следующему сообщению об ошибке:

Ошибка в посреднике (med.fit, out.fit, Treat = "data1 $ Условие. Тип ", mediator =" data1 $ Shared.Oppression ",: неиспользуемые аргументы (Treat =" data1 $ Condition.Type ", mediator =" data1 $ Shared.Oppression ", robustSE = TRUE, sims = 100)

Я не уверен, как это исправить или я неправильно что-то ввел?

Answer 1

Проблема будет связана с пробелами в именах столбцов. Это можно исправить, заключив в кавычки (`)

library(mediation)
med.fit <- lm(`shared oppression` ~ `condition type` +
           `participant number`, data = data1) 
out.fit <- lm(attitudes2 ~ `condition type` + `participant number` +   
            `shared oppression`, data = data1)

med.out<- mediate(med.fit, out.fit, treat="condition type",
          mediator = "shared oppression", robustSE = TRUE, sims = 100)

---

Используя воспроизводимый пример

data(jobs)
names(jobs)[1] <- "treat type"
b <- lm(job_seek ~ `treat type` + econ_hard + sex + age, data=jobs)
c <- lm(depress2 ~ `treat type` + job_seek + econ_hard + sex + age, data=jobs)

# Estimation via quasi-Bayesian approximation
contcont <- mediate(b, c, sims=50, treat="treat type", mediator="job_seek")

contcont$d0
#[1] -0.0128006