# NOT RUN {
tbl_uv_nevent_ex <-
trial %>%
dplyr::select(response, trt, age, grade) %>%
tbl_uvregression(
method = glm,
y = response,
method.args = list(family = binomial)
) %>%
add_nevent()
# }
Run the code above in your browser using DataLab