Plot a list of survfit objects with ggsurvplot()

[kassambara]

No description provided.

[kassambara]

The function ggsurvplot() can take a list of survfit objects and produces a list of ggsurvplots.

Simplified formats

ggsurvplot(fit, data, title = NULL,
           legend.labs = NULL, legend.title = "Strata", ...)

Where,

• fit can be a list of survfit objects
• data is the data used to fit survival curves. Can be also a list of same length than fit.
• title is title of the plot. Can be a character vector or a list of titles of same length than fit. If title is not specified and fit is a named list, then the names of fit list are used as title.
• legend.labs is character vector specifying legend labels. Used to replace the names of the strata from the fit. Should be given in the same order as those strata. Can be a list when fit is a list.
• legend.title is the legend title for each plot. Can be a character vector or a list of titles of same length than fit.

Compute multiple survival curves

 library(survival)
 # Compute multiple survival curves
 fit1 <- survfit(Surv(time, status) ~ sex, data = colon)
 fit2 <- survfit(Surv(time, status) ~ adhere, data = colon)
 fits <- list(sex = fit1, adhere = fit2)

Visualize

library("survminer")
legend.title <- list("sex", "rx")
ggsurv.list <- ggsurvplot(fits, colon, legend.title = legend.title, 
                           risk.table = TRUE, tables.theme = theme_cleantable(),
                           pval = TRUE, conf.int = TRUE, palette = "jco")
 names(ggsurv.list)

[1] "sex"    "adhere"

 ggsurv.list$sex

 ggsurv.list$adhere