# NOT RUN {
# plot of Power vs Delta for split-plot design
# without the interaction effects
plots.Split(whole.factor.lev=2, split.factor.lev=2, interaction=FALSE,
delta_type=1, delta=c(1, 0, 1, 1), alpha=0.05, beta=0.2, type=1)
# plot of Power vs Sample size for split-plot design
# with the interaction effects
plots.Split(whole.factor.lev=2, split.factor.lev=2, interaction=TRUE,
delta_type=1, delta=c(1, 1, 1, 1), deltao=1, alpha=0.05, beta=0.2, type=3)
# }
Run the code above in your browser using DataLab