Given the following, how can I get the two models in out
to a gtsummary
table?
library(dplyr)
library(purrr)
m.1.1 <- "cyl"
m.1.2 <- paste(c(m.1.1, "disp"), collapse = " ")
out <- map(dplyr::lst(m.1.1, m.1.2),
~ lm(data = mtcars, formula = as.formula(paste0("mpg ~ ", .x))))
I think that I want to use tbl_regression
and tbl_merge
, but -- basing my code off of the answer to
Created on 2021-10-11 by the reprex package (v2.0.1)