# \donttest{
# Example 1 ----------------------------------
add_n.tbl_regression_ex1 <-
trial %>%
select(response, age, grade) %>%
tbl_uvregression(
y = response,
method = glm,
method.args = list(family = binomial),
hide_n = TRUE
) %>%
add_n(location = "label")
# Example 2 ----------------------------------
add_n.tbl_regression_ex2 <-
glm(response ~ age + grade, trial, family = binomial) %>%
tbl_regression(exponentiate = TRUE) %>%
add_n(location = "level")
# }
Run the code above in your browser using DataLab