# NOT RUN {
if(requireNamespace("survival")){
data("ovarian", package = "survival")
model <- fit(
modeling_procedure(
method = "coxph",
parameter = list(formula = list(survival::Surv(futime, fustat) ~ age))),
x = ovarian, y = NULL
)
predict(model, ovarian[11:16,])
}
# }
Run the code above in your browser using DataLab