get_three_plus_three.Rd
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()#> [1] 2#> [1] TRUE#> [1] 1#> [1] FALSE