# NOT RUN {
library(ed50simulation)
pavaData <- preparePava(groupS)
bootIsotonicResample(data = groupS,
mle = list(baselinePava = pavaData,
firstDose = 2.5,
PROBABILITY.GAMMA = 0.5))
# }
Run the code above in your browser using DataLab