# using all the defaults: margin=0.8, theta0=0.95, alpha=0.025
# log-transformed, design="2x2"
# should give: 0.4916748
power.noninf(CV=0.3, n=24)
#
# vectorized answer
# should give: [1] 0.7146648 0.8227931 0.8926036
power.noninf(alpha=0.05, CV=0.3, n=c(30,40,50), design="2x2")
Run the code above in your browser using DataLab