R/gt_univariate_crosstabs.R
    add_crosstabs.RdA {gtsummary} wrapper function that takes a gtsummary univariate regression table and adds appropriate cross tabs by exposure and outcome
add_crosstabs(x, wide = FALSE)Object with class tbl_uvregression from the gtsummary
tbl_uvregression function or tbl_cmh from the epitabulate tbl_cmh function.
TRUE/FALSE to specify whether would like to have the output in wide format. Results in four columns rather than two, but in a single row. This is only works for dichotomous variables (yes/no, TRUE/FALSE, male/female), others will be dropped with a warning message. (Default is FALSE)
Inspired by Daniel Sjoberg, see gtsummary github repo