Experimental lifecycle For each survfit() object summarized with tbl_survfit() this function will add the total number of events observed in a new column.

# S3 method for tbl_survfit
add_nevent(x, ...)

Arguments

x

object of class 'tbl_survfit'

...

Not used

Example Output

Example 1

See also

Examples

library(survival) fit1 <- survfit(Surv(ttdeath, death) ~ 1, trial) fit2 <- survfit(Surv(ttdeath, death) ~ trt, trial) # Example 1 ---------------------------------- add_nevent.tbl_survfit_ex1 <- list(fit1, fit2) %>% tbl_survfit(times = c(12, 24)) %>% add_n() %>% add_nevent()