library(dplyr)
adtte <- tern_ex_adtte %>%
filter(PARAMCD == "OS") %>%
mutate(is_event = CNSR == 0)
h_tbl_coxph_pairwise(
df = adtte,
variables = list(tte = "AVAL", is_event = "is_event", arm = "ARM"),
control_coxph_pw = control_coxph(conf_level = 0.9)
)
Run the code above in your browser using DataLab