# Activate progress bar (optional)
if (FALSE) progressr::handlers(global = TRUE)
# Optimize
# \donttest{
optimal_normal(w=0.3, # define parameters for prior
Delta1 = 0.375, Delta2 = 0.625, in1=300, in2=600, # (https://web.imbi.uni-heidelberg.de/prior/)
a = 0.25, b = 0.75,
n2min = 20, n2max = 100, stepn2 = 4, # define optimization set for n2
kappamin = 0.02, kappamax = 0.2, stepkappa = 0.02, # define optimization set for kappa
alpha = 0.025, beta = 0.1, # drug development planning parameters
c2 = 0.675, c3 = 0.72, c02 = 15, c03 = 20, # fixed/variable costs for phase II/III
K = Inf, N = Inf, S = -Inf, # set constraints
steps1 = 0, # define lower boundary for "small"
stepm1 = 0.5, # "medium"
stepl1 = 0.8, # and "large" effect size categories
b1 = 3000, b2 = 8000, b3 = 10000, # benefit for each effect size category
gamma = 0, # population structures in phase II/III
fixed = FALSE, # true treatment effects are fixed/random
skipII = FALSE, # skipping phase II
num_cl = 1) # number of cores for parallelized computing
# }
Run the code above in your browser using DataLab