# NOT RUN {
# Example 1 ----------------------------------
tbl_lm_global_ex1 <-
lm(marker ~ age + grade, trial) %>%
tbl_regression() %>%
add_global_p()
# Example 2 ----------------------------------
tbl_uv_global_ex2 <-
trial[c("response", "trt", "age", "grade")] %>%
tbl_uvregression(
method = glm,
y = response,
method.args = list(family = binomial),
exponentiate = TRUE
) %>%
add_global_p()
# }
Run the code above in your browser using DataLab