Batch mediate

batch_mediate(data, mediator_df, nsims = 500, conf.level = 0.95)

Arguments

data

data.frame with two columns: X (independent variable) and Y (dependent variable).

mediator_df

data.frame with mediators, each column representing a different mediator variable.

nsims

Number of bootstrap simulations for estimating confidence intervals (default is 500).

conf.level

Confidence level for the confidence intervals (default is 0.95).

Value

data.frame

Examples

set.seed(123)
n <- 200
X <- rnorm(n)
M1 <- 0.5 * X + rnorm(n)
M2 <- 0.3 * X + rnorm(n)
M3 <- 0.1 * X + rnorm(n)
Y <- 0.3 * X + 0.4 * M1 + 0.2 * M2 + rnorm(n)
data <- data.frame(X, Y)
mediators <- data.frame(M1, M2, M3)
if (requireNamespace("mediation")) {
  results <- batch_mediate(data, mediators)
  print(results)
}
#> Loading required namespace: mediation