powered by
Derive confidence-based decision thresholds for efficacy and inferiority from a group sequential design.
getConfidenceFromBounds(design)
List of values:
critical.values: Critical z-levels at each stage
alpha.spending.one.sided: One-sided alpha critical values for each stage
alpha.spending.cumulative: One-sided alpha accumulated by each stage
confidence.threshold.efficacy: Upper bounds for confidence i.e. declare efficacy if exceeded
confidence.threshold.inferiority: Lower bounds for confidence i.e. declare inferiority if below
TrialDesign object generated from 'getGSDesign'.
getGSDesign()
# confidence bounds for a 6-stage trial with a maximum sample size of 1000 bounds <- getConfidenceFromBounds(getGSDesign(looks=seq(500, 1000, 100)))
Run the code above in your browser using DataLab