ADTreatSelExample2 | R Documentation |
Consider a seamless Phase II/Phase III or Phase III trial with a binary primary efficacy endpoint. This endpoint represents a success rate and thus a higher proportion corresponds to a more favorable outcome. The efficacy and safety profiles of three treatments, e.g., three doses of an experimental treatment, will be evaluated in this trial compared to a control. An adaptive design with two interim analyses will be employed in the trial (the first interim analysis may correspond to the end of the Phase II portion of the trial). The following decision rules will be applied at the interim looks:
Futility stopping rule will be applied at the first interim analysis (IA1). A treatment arm may be dropped due to futility if the treatment-specific conditional power is too low. The trial will be terminated for futility if all treatment arms are dropped.
Treatment selection rule will be applied at the second interim analysis (IA2). Two best performing treatments will be selected for the final analysis (FA) and patient enrollment will be discontinued in the third treatment arm after the second interim analysis.
The following design parameters will be assumed:
A balanced design with 150 enrolled patients per trial arm will be utilized in the trial.
The patient dropout rate at the end of the treatment period is equal to 10%.
The information fractions at IA1 and IA2 are set to 40% and 60%.
The futility threshold for each treatment arm at IA1 is set to 15%. The response rates for the primary endpoint are assumed to be 10% in the control arm and 25% in each treatment arm.
To protect the overall Type I error rate in the trial, the Hochberg procedure will be used at the final analysis.
Key operating characteristics of this adaptive design with a treatment selection option at the second interim look will be evaluated using the ADTreatSel
function based on 10,000 simulation runs. To invoke this function, a list of all design and decision rule parameters (parameters
) needs to be created as shown below. A comprehensive simulation report for this adaptive design can be generated by calling the GenerateReport
function and a graphical user interface can be launched using the ADTreatSelApp
function.
No arguments
No return value
ADTreatSel
, ADTreatSelExample1
, ADTreatSelExample3
# List of all parameters
parameters = list()
# Endpoint type
parameters$endpoint_type = "Binary"
# Direction of favorable outcome
parameters$direction = "Higher"
# Number of enrolled patients (control, three treatments)
parameters$sample_size = c(150, 150, 150, 150)
# Patient dropout rate
parameters$dropout_rate = 0.1
# Response rate in the control arm
parameters$control_rate = 0.1
# Response rates in the treatment arms
parameters$treatment_rate = c(0.25, 0.25, 0.25)
# Information fractions at IA1, IA2, FA
parameters$info_frac = c(0.4, 0.6, 1)
# Futility threshold for conditional power at IA1
parameters$futility_threshold = 0.15
# Number of treatments to be selected at the second interim analysis
parameters$treatment_count = 2
# Multiple testing procedure to be used in the trial
parameters$mult_test = "Hochberg"
# One-sided alpha level
parameters$alpha = 0.025
# Number of simulations, you should prefer more
parameters$nsims = 100
# Number of cores for parallel calculations
parameters$ncores = 1
# Run simulations to compute operating characteristics
results = ADTreatSel(parameters)
# Generate a simulation report (remove tempfile)
GenerateReport(results,
tempfile("ADTreatSel Binary endpoint.docx", fileext=".docx"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.