# \donttest{
# Example 1 ----------------------------------
library(survival)
tbl_regression_ex1 <-
coxph(Surv(ttdeath, death) ~ age + marker, trial) %>%
tbl_regression(exponentiate = TRUE)
# Example 2 ----------------------------------
tbl_regression_ex2 <-
glm(response ~ age + grade, trial, family = binomial(link = "logit")) %>%
tbl_regression(exponentiate = TRUE)
# Example 3 ----------------------------------
suppressMessages(library(lme4))
tbl_regression_ex3 <-
glmer(am ~ hp + (1 | gear), mtcars, family = binomial) %>%
tbl_regression(exponentiate = TRUE)
# }
Run the code above in your browser using DataLab