adtte %>%
visR::estimate_KM(strata = "SEX") %>%
visR::visr() %>%
visR::add_CI(alpha = 0.4) %>%
visR::add_highlight(strata = "M", bg_alpha = 0.2)
strata <- c("Placebo", "Xanomeline Low Dose")
adtte %>%
visR::estimate_KM(strata = "TRTP") %>%
visR::visr() %>%
visR::add_CI(alpha = 0.4) %>%
visR::add_highlight(strata = strata, bg_alpha = 0.2)
Run the code above in your browser using DataLab