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