mirror of
https://github.com/agdamsbo/FreesearchR.git
synced 2026-09-30 14:16:22 +02:00
This commit is contained in:
parent
a82a5c6378
commit
6db500d13a
3 changed files with 23 additions and 4 deletions
|
|
@ -96,15 +96,17 @@
|
|||
#' # gtsummary::bold_p()
|
||||
#' }
|
||||
regression_table <- function(x, ...) {
|
||||
args <- list(...)
|
||||
|
||||
if ("list" %in% class(x)) {
|
||||
x |>
|
||||
purrr::map(\(.m){
|
||||
regression_table_create(x = .m, ...) |>
|
||||
regression_table_create(x = .m, args.list = args) |>
|
||||
gtsummary::add_n()
|
||||
}) |>
|
||||
gtsummary::tbl_stack()
|
||||
} else {
|
||||
regression_table_create(x, ...)
|
||||
regression_table_create(x, args.list = args)
|
||||
}
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue