Get an object to fit the 3+3 model.
Get an object to fit the 3+3 model.
get_three_plus_three(num_doses, allow_deescalate = FALSE, ...)
num_doses |
Number of doses under investigation. |
allow_deescalate |
TRUE to allow de-escalation, as described by Korn et al. Default is FALSE. |
... |
Extra args are not currently used. |
an object of type selector_factory that can fit the
3+3 model to outcomes.
Storer BE. Design and Analysis of Phase I Clinical Trials. Biometrics. 1989;45(3):925-937. doi:10.2307/2531693
Korn EL, Midthune D, Chen TT, Rubinstein LV, Christian MC, Simon RM. A comparison of two phase I trial designs. Statistics in Medicine. 1994;13(18):1799-1806. doi:10.1002/sim.4780131802
model <- get_three_plus_three(num_doses = 5)
fit1 <- model %>% fit('1NNN 2NTN')
fit1 %>% recommended_dose()
fit1 %>% continue()
fit2 <- model %>% fit('1NNN 2NTN 2NNT')
fit2 %>% recommended_dose()
fit2 %>% continue()Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.