extract_strata: Extract strata from a tidied survival object

In KaiAragaki/thrive: An Overly-Minimal Take on Survminer

Extract strata from a tidied survival object

Description

The tidied results of a survival object are in

Usage

extract_strata(tbl, column, ...)

Arguments

tbl	A table
column	Column to extract. Should be of the form col1=val1, col2=val2, ...
...	Extra arguments passed on to extract, such as remove or convert. This function is from David Robinson's drlib package.

Examples

library(survival)
library(broom)

surv_td <- survfit(Surv(stop - start, status) ~ sex + pcdx,
                    data = mgus1) %>%
  tidy()

surv_td

# Extract into "sex" and "pcdx" columns
surv_fit %>%
  extract_strata(strata)

# Now visualize, separating by strata
library(ggplot2)
surv_fit %>%
  extract_strata(strata) %>%
  ggplot(aes(time, estimate, color = sex)) +
  geom_line() +
  geom_ribbon(aes(ymin = conf.low, ymax = conf.high), alpha = .25) +
  facet_wrap(~ pcdx)

KaiAragaki/thrive documentation built on Sept. 3, 2023, 7:50 a.m.