Description Usage Arguments References Examples
Calculates the two sided 1-2*alpha confidence interval based on the work from Koyama and Chen.
1 | get_CI(k, r1, n1, n, alpha = 0.05, precision = 4)
|
k |
overall observed responses (must be larger than r1). |
r1 |
critical value for the first stage. |
n1 |
sample size for the first stage. |
n |
overall sample size. |
alpha |
determining the two sided 1-2*alpha confidence interval. |
precision |
gives the precision (in decimal numbers) to which the confidence interval should be calculated (should be less than 10). |
Koyama T and Chen H (2008): Proper inference from Simon's two-stage designs. Statistics in Medicine, 27(16):3145-3154.
1 2 3 4 5 6 7 | #Calculate a Simon's two-stage design
design <- getSolutions()$Solutions[3,] #minimax-design for the default values.
#Assume 9 responses were observed in the whole trial.
k = 9
ci <- get_CI(k, design$r1, design$n1, design$n)
|
Loading required package: Rcpp
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.