# List of all parameters
parameters = list()
# Endpoint type
parameters$endpoint_type = "Normal"
# Direction of favorable outcome
parameters$direction = "Higher"
# Dose levels in the trial
parameters$dose_levels = c(0, 20, 50, 100, 250)
# Total number of enrolled patients in each trial stage
parameters$stage_sample_size = c(80, 80, 80, 80)
# Length of the treatment period (months)
parameters$treatment_period = 3
# Length of the patient enrollment period (months)
parameters$enrollment_period = 24
# Median enrollment time (months)
parameters$enrollment_parameter = 18
# Patient dropout rate
parameters$dropout_rate = 0.1
# Mean and SD for the primary endpoint in the placebo group
parameters$control_mean = 1.5
parameters$control_sd = 4
# Mean and SD for the primary endpoint in the dosing groups
parameters$treatment_mean = c(2, 2.5, 3, 3.5)
parameters$treatment_sd = c(4, 4, 4, 4)
# Fixed randomization ratio in the placebo group
parameters$ratio_placebo = 0.2
# Threshold for clinically meaningful improvement over placebo
parameters$delta = 1.5
# Balance parameter for adaptive randomization
parameters$balance = 2
# Non-linear parameters of the candidate dose-response models used in the MCPMod method
# for modeling the dose-response relationship
# Non-linear parameter of the exponential model (delta)
parameters$exponential_model_parameter = 100
# Non-linear parameter of the Emax model (ED50)
parameters$emax_model_parameter = 200
# Non-linear parameters of the logistic model (ED50 and delta)
parameters$logistic_model_parameters = c(125, 25)
# One-sided Type I error rate
parameters$alpha = 0.025
# Number of cores for parallel calculations
parameters$ncores = 1
# Number of simulations, you should prefer more (use large values!)
parameters$nsims = 10
# Remove this parameter in your code:
parameters$withoutCharts = TRUE
# Run simulations to compute operating characteristics
results = ADRand(parameters)
# Generate a simulation report (remove tempfile)
GenerateReport(results,
tempfile("ADRand Normally distributed endpoint.docx", fileext=".docx"))
Run the code above in your browser using DataLab