library(carData)
# The OBrienKaiser dataset from the carData package
ao <- OBrienKaiser
# Add a unique person identifier to the dataset
ao$pers <- 1:nrow(OBrienKaiser)
# One-way between-subjects ANOVA
# \donttest{
AObootBetween(
var.between = "treatment",
var.dv = "pre.1",
var.id = "pers",
levels.b1 = c("control", "A", "B"),
eff.si = "ges",
data = ao,
n.sim = 1000,
alpha = .05,
seed = 1234,
n.round = 2)
# }
# Two-way between-subjects ANOVA
# \donttest{
AObootBetween(
var.between = c("treatment", "gender"),
var.dv = "pre.1",
var.id = "pers",
levels.b1 = c("control", "A", "B"),
levels.b2 = c("M", "F"),
eff.si = "pes",
data = ao,
n.sim = 1000,
alpha = .05,
seed = 1236,
n.round = 2)
# }
Run the code above in your browser using DataLab