target <- 0.3
truetox <- c(0.30, 0.45, 0.50, 0.55, 0.60, 0.65)
ncohort <- 10
cohortsize <- 3
ntrial <- 4000
get_oc_Ivanova_binary(target = target, truetox = truetox, ncohort = ncohort,
cohortsize = cohortsize, ntrial = ntrial)
Run the code above in your browser using DataLab