# NOT RUN {
library(survival)
library(recipes)
rec <- recipe(time + status ~ ., data = veteran) %>%
role_surv(time = time, event = status) %>%
role_case(stratum = status)
(res <- resample(rec, model = CoxModel))
summary(res)
# }
Run the code above in your browser using DataLab