get_oc_hybrid {HybridDesign} | R Documentation |
Generate operating characteristics for single-agent dose-finding studies using the Hybrid design
Description
Obtain the operating characteristics of the Hybrid design for single-agent dose-finding studies by simulation.
Usage
get_oc_hybrid(trueMTD, trueDLTvec, dose, target, ncohort, cohortsize,
eps1=0.05, eps2=0.05,a=1, b=1, cutoff.eli=0.95,
tox.control=TRUE, cut.tox=0.8, esc.control=FALSE, cut.esc=0.5,
ntrial, seednum=10000)
Arguments
trueMTD |
the dosage of true maximum tolerated dose (MTD) |
trueDLTvec |
a vector of true dose-limiting toxicity (DLT) rates at each dose level |
dose |
a vector containing the numerical dosage of each dose level |
target |
target toxicity rate |
ncohort |
the total number of cohorts |
cohortsize |
the cohort size |
eps1 |
mTPI design parameter epsilon1. Default: 0.05 |
eps2 |
mTPI design parameter epsilon2. Default: 0.05 |
a |
Beta prior shape parameter 1. Default: 1 |
b |
Beta prior shape parameter 2. Default: 1 |
cutoff.eli |
Posterior probability cutoff of eliminating dose due to unacceptable toxicity. Default: 0.95 |
tox.control |
indicator of whether to perform toxicity control. If |
cut.tox |
toxicity control cutoff. Default: 0.8 |
esc.control |
indicator of whether to perform escalation control. If |
cut.esc |
escalation control cutoff. Default: 0.5 |
ntrial |
the total number of trials to be simulated |
seednum |
the random seed for simulation |
Value
This function returns the operating characteristics of the Hybrid design as a list, including: (1) Percentage of correct selection of the true MTD in all simulated trials, (2) Percentage of selecting a dose above MTD in all simulated trials, (3) Percentage of selecting a dose below MTD in all simulated trials, (4) Average number of patients treated at MTD in all simulated trials.
Examples
get_oc_hybrid(trueMTD=12, trueDLTvec=c(0.15,0.20,0.25,0.30,0.35), dose=c(3, 6, 12, 18, 24),
target=0.25, ncohort=10, cohortsize=3, eps1=0.05, eps2=0.05, a=1, b=1,
cutoff.eli=0.95, tox.control=TRUE, cut.tox=0.8, esc.control=FALSE, cut.esc=0.5,
ntrial=100, seednum=10000)