# NOT RUN {
# Estimate power for a trial with 3 steps and 9 clusters at the
# initiation of the study. Those
# clusters have 14 subjects each with no time effects.
# We estimated arm outcome proportions of
# 0.2 (pre-treatment) and 0.31 (post-treatment) and intracluster
# correlation coefficient (ICC) of 0.05.
# The resulting power should be 0.7992842.
# }
# NOT RUN {
sw.bin <- cpa.sw.binary(nclusters = 9,
steps = 3,
nsubjects = 14,
timeEffect = 0,
ICC = 0.05,
p1 = 0.31,
p0 = 0.2)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab