# NOT RUN {
data("VerbAgg")
mod <- eirm(formula = "r2 ~ -1 + situ + btype + mode + (1|id)", data = VerbAgg)
# Only one predictor
p1 <- marginalplot(mod, predictors = c("situ"))
# Two predictors
p2 <- marginalplot(mod, predictors = c("situ", "btype"))
# All three predictors
p3 <- marginalplot(mod, predictors = c("situ", "btype", "mode"))
# }
Run the code above in your browser using DataLab