# NOT RUN {
## c1, n, c they all come from optimal function. Details are shown as follows:
# }
# NOT RUN {
optimal(shape = 1, m0 = 1, ms = 2.4, tf = 3,
ta = 24, tot_size = 19, dist = "WB")
| alpha | beta | n1 | c1 | n | c | t1 | MTSL | ESS | PS
| 0.05 | 0.08 | 15 | 0.0508 | 19 | 1.6434 | 17.9751 | 27 | 16.5183 | 0.5203
# }
# NOT RUN {
get_oc(shape = 1, m0 = 1, mA = 2.4, hr = 0.6, frac = 15/19,
ta = 24, tf = 3, c1 = 0.0508, c = 1.6434,
diff = 0.25, n = 19, nsim = 10000)
# }
Run the code above in your browser using DataLab