# NOT RUN {
# Example 1 ----------------------------------
tbl_cross_ex1 <-
trial %>%
tbl_cross(row = trt, col = response) %>%
bold_labels()
# Example 2 ----------------------------------
tbl_cross_ex2 <-
trial %>%
tbl_cross(row = stage, col = trt, percent = "cell") %>%
add_p() %>%
bold_labels()
# }
Run the code above in your browser using DataLab