# NOT RUN {
# To make a design using default arguments:
design <- multi_arm_designer()
# A design with different mean and sd in each arm
design <- multi_arm_designer(means = c(0, 0.5, 2), sd = c(1, 0.1, 0.5))
design <- multi_arm_designer(N = 80, m_arms = 4, means = 1:4,
fixed = c("means", "sds"))
# }
Run the code above in your browser using DataLab