# NOT RUN {
if (requireNamespaces("reticulate")) {
fit <- coxtime(data = simsurvdata(50))
# predict survival matrix and relative risks
predict(fit, simsurvdata(10), type = "all")
# return as distribution
if (requireNamespaces("distr6")) {
predict(fit, simsurvdata(10), distr6 = TRUE)
}
}
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab