get_CI: Calculates the confidence interval.

Description Usage Arguments References Examples

View source: R/zzz.R

Description

Calculates the two sided 1-2*alpha confidence interval based on the work from Koyama and Chen.

Usage

1
get_CI(k, r1, n1, n, alpha = 0.05, precision = 4)

Arguments

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).

References

Koyama T and Chen H (2008): Proper inference from Simon's two-stage designs. Statistics in Medicine, 27(16):3145-3154.

Examples

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)

Example output

Loading required package: Rcpp

OneArmPhaseTwoStudy documentation built on May 2, 2019, 9:28 a.m.