Closed NightlordTW closed 1 year ago
> # Survival outcome > tau0 <- with(survivalExample, + min(quantile(y[trt == "drug1"], 0.95), quantile(y[trt == "drug0"], 0.95))) > > output_cv2 <- cv(response = "survival", + cate.model = survival::Surv(y, d) ~ age + female + + previous_cost + previous_number_relapses, + ps.model = trt ~ age + previous_treatment, + ipcw.model = ~ age + previous_cost + previous_treatment, + data = survivalExample, + score.method = c("poisson", "randomForest"), + followup.time = NULL, + tau0 = tau0, + surv.min = 0.025, + higher.y = TRUE, + cv.n = 5, + initial.predictor.method = "randomForest", + plot.gbmperf = FALSE, + seed = 999) Warning in data.preproc.surv(fun = "cv", cate.model = cate.model, ps.model = ps.model, : Variable trt was recoded to 0/1 with drug0->0 and drug1->1.