# n=50 in 3 groups, "medium" effect size
p_anova.test(50, k=3, f=.25)
# return analysis model
p_anova.test(50, k=3, f=.25, return_analysis=TRUE)
# explicit means/sds
p_anova.test(50, 3, means=c(0,0,1), sds=c(1,2,1))
# \donttest{
# compare simulated results to pwr package
pwr::pwr.anova.test(f=0.28, k=4, n=20)
p_anova.test(n=20, k=4, f=.28) |> Spower()
# }
Run the code above in your browser using DataLab