# NOT RUN {
inline_text_ex1 <-
trial %>%
dplyr::select(response, age, grade) %>%
tbl_uvregression(
method = glm,
method.args = list(family = binomial),
y = response,
exponentiate = TRUE
)
inline_text(inline_text_ex1, variable = "age")
inline_text(inline_text_ex1, variable = "grade", level = "III")
# }
Run the code above in your browser using DataLab