# NOT RUN {
ttox = c(0.05, 0.15, 0.3, 0.45, 0.6)
teff = c(0.05, 0.15, 0.3, 0.45, 0.6)
phi_t = 0.3
phi_e = 0.3
eps_t = 0.1 * phi_t
eps_e = 0.1 * phi_e
oc = get.OC.MinED(ttox = ttox, teff = teff, phi_t = phi_t, phi_e = phi_e,
eps_t = eps_t, eps_e = eps_e, cohortsize = 3, ncohort1 = 6,
ncohort2 = 14, ntrial = 100)
print(oc)
# }
Run the code above in your browser using DataLab