#Generate sample
if(skpr:::run_documentation()) {
calculate_power_curves(trials=seq(50,150,by=20),
candidateset = expand.grid(x=c(-1,1),y=c(-1,1)),
model = ~.,
effectsize = list(c(0.5,0.9),c(0.6,0.9)),
eval_function = eval_design_mc,
eval_args = list(nsim = 100, glmfamily = "binomial"))
}
Run the code above in your browser using DataLab