simdat.prop2 <- sim.prop2(nx = 30, ny = 40, px = 0.5, py = 0.55,
num.experiments = 2, experiment.name = "sim", group.name = "treatment",
x.value = "group_1", y.value = "group_2", value.name = "correct_answer",
seed = 3)
test.statistics.prop2 <- sim.prop2.test(simdat.prop2 = simdat.prop2,
p = NULL, alternative = "less", conf.level = 0.95, correct = TRUE,
experiment.name = "sim", group.name = "treatment", x.value = "group_1",
y.value = "group_2", value.name = "correct_answer")
Run the code above in your browser using DataLab