Paste event-free survival

Creates a formatted event-free-survival from a survfit object and a specified time point.

Usage

paste_efs(x, times, percent.sign = TRUE, digits = 1)

Arguments

x

A survfit object. The survival model.

times

A numeric. Indicates time-points of interest. Units are whatever was used to create the survival fit.

percent.sign

A logical. Indicates percent sign should be printed for frequencies.

digits

Integer. Number of digits to round to.

Value

A named character vector of event-free survival(s).

Examples

library(survival)

fit <- survfit(Surv(time, status) ~ 1, data = diabetic)
paste_efs(fit, c(1, 3, 5))
#>                   1                   3                   5 
#>  "99.2% [98.4-100]" "93.9% [91.5-96.3]"   "92.6% [90-95.2]"