applied_titecrmts_sim: Simulate TITE-CRM trials using specified design options

In dtpcrm: Dose Transition Pathways for Continual Reassessment Method

Description

applied_titecrmts_sim is used to simulate trials using the two-stage time-to-event continual reassessment method with specified design options to determine the operating characteristics.

Usage

applied_titecrmts_sim(true_tox, prior, target, max_sample_size,
    num_sims, cohort_size = 1, obswin, minfu, recrate, initdes,
    dose_func = applied_titecrm, ...)

Arguments

true_tox	A vector of 'true' underlying rates of toxicity for each of the dose levels.
prior	A vector of prior estimates of toxicity probabilties for the dose levels.
target	The target DLT rate.
max_sample_size	The maximum number of subjects to be recruited in any simulation.
num_sims	The total number of simulations to be run.
cohort_size	The size of the cohorts. Default is 1.
obswin	The observation period for total subject follow up.
minfu	The minimum amount of follow-up required for each subject.
recrate	The number of subjects recruited per obswin.
initdes	A vector specifying the doses to be assisned to subjects as per the initial design.
dose_func	The function to be employed in executing the CRM. Default is applied_titecrm.
...	Any other arguements detailed in dtp::applied_titecrm.

Value

A list containg two further lists. The first of these lists contains the operating charateristics of the design, the second contains the underlying data for each of the simulation iterations.

References

O'Quigley, J. O., Pepe, M., and Fisher, L. (1990). Continual reassessment method: A practical design for phase I clinical trials in cancer. Biometrics 46:33-48.

Cheung, Y. K. (2011). Dose Finding by the Continual Reassessment Method. New York: Chapman & Hall/CRC Press.

Examples

# It may take quite long for large num_sims
prior  <- c(0.1, 0.3, 0.5)
target <- 0.2
true_tox <- c(0.05, 0.2, 0.35)
first_dose <- 1
num_sims <- 5  # recommend doing 5000 simulations for the final design
obswin = 80

applied_titecrmts_sim(true_tox = true_tox, prior = prior, target = target,
                      max_sample_size = 21, num_sims = num_sims,
                      cohort_size = 3, obswin = obswin, minfu = 20,
                      recrate = 3, initdes = c(rep(1, 3), rep(2, 3), rep(3, 15)),
                      dose_func = applied_titecrm)
                      

dtpcrm documentation built on Aug. 20, 2019, 5:23 p.m.