study.prop <- simstudy.prop(n = 30, p.actual = 0.42,
p.hypothesized = 0.5, num.experiments = 2, alternative = "less",
conf.level = 0.92, correct = TRUE, the.quantiles = c(0.04, 0.5, 0.96),
experiment.name = "simulation_id", value.name = "success", seed = 8001)
Run the code above in your browser using DataLab