powered by
Let sij be the severity score associated with the jth case in the ith treatment group. \(\mu_i=mean(s_{ij})\), \(\sigma^2_i=var(s_{ij})\).
H0: pT=pC and muT=muC
Ha: pT is not equal to pC and muT is not equal to muC
Vaccine.CEM(alpha, beta, mu_t, mu_c, sigma_t, sigma_c, pt, pc)
significance level
power=1-beta
mean of treatment group
mean of control group
standard deviation of treatment group
standard deviation of control group
the true disease incidence rates of the nt vaccines
the true disease incidence rates of the nc controls
Chow SC, Shao J, Wang H. Sample Size Calculation in Clinical Research. New York: Marcel Dekker, 2003
# NOT RUN { Example.15.6.4<-Vaccine.CEM(0.05,0.2,0.2,0.3,sqrt(0.15),sqrt(0.15),0.1,0.2) Example.15.6.4 # }
Run the code above in your browser using DataLab