max_samp=15
Cohort=3
ptrue=c(0.01,0.05,0.15,0.3,0.45,0.5,0.6,0.8)
mu=seq(0.1,0.8,0.1)
p_rho=0.9
sigma = 2
mtd = 0.3
p_u=0.9
B=200 ##Number of iterations, Change to 2k
M=10 ##Number of simulations, Change to larger
Z=FBCRMSimTrial(max_samp,Cohort,ptrue,mu,p_rho,sigma,mtd,p_u,B,M)
Z
Run the code above in your browser using DataLab