library(dplyr)
library(survival)
adtte <- tern_ex_adtte |> filter(PARAMCD == "OS")
fit <- survfit(
formula = Surv(AVAL, 1 - CNSR) ~ ARMCD,
data = adtte
)
h_tbl_median_surv(fit_km = fit)
h_tbl_median_surv(fit_km = fit, digits = 2)
Run the code above in your browser using DataLab