cox1 <- survival::coxph(Surv(AVAL, EVENT) ~ TRT01P, data = codebreak200)
result <- tipping_point_model_free(
dat = codebreak200,
reason = "Early dropout",
impute = "docetaxel",
cox_fit = cox1,
method = "random sampling"
)
assess_plausibility(result)
Run the code above in your browser using DataLab