v2.0 tbl_uvregression() (#1692)

* progress * updates * updates * progress * in progress * progress * progress * Update tbl_uvregression.Rd * progress * Update DESCRIPTION
ddsjoberg · May 28, 2024 · c5dffd4 · c5dffd4
1 parent fc8527e
commit c5dffd4
Show file tree

Hide file tree

Showing 10 changed files with 1,332 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -59,12 +59,13 @@ Suggests:
     broom (>= 1.0.5),
     broom.helpers (>= 1.15.0),
     broom.mixed,
-    cardx (>= 0.1.0.9039),
+    cardx (>= 0.1.0.9049),
     effectsize,
     emmeans,
     knitr,
     lme4,
     smd,
+    survey,
     survival,
     testthat (>= 3.2.0),
     withr,

diff --git a/NAMESPACE b/NAMESPACE
@@ -3,11 +3,13 @@
 S3method(add_difference,tbl_summary)
 S3method(add_n,tbl_regression)
 S3method(add_n,tbl_summary)
+S3method(add_n,tbl_uvregression)
 S3method(add_nevent,tbl_regression)
 S3method(add_overall,tbl_summary)
 S3method(add_p,tbl_summary)
 S3method(add_stat_label,tbl_summary)
 S3method(as.data.frame,gtsummary)
+S3method(as.data.frame,survey.design)
 S3method(as_tibble,gtsummary)
 S3method(assign_tests,tbl_summary)
 S3method(bold_labels,gtsummary)
@@ -17,6 +19,8 @@ S3method(italicize_levels,gtsummary)
 S3method(knitr::knit_print,gtsummary)
 S3method(print,gtsummary)
 S3method(tbl_regression,default)
+S3method(tbl_uvregression,data.frame)
+S3method(tbl_uvregression,survey.design)
 export("%>%")
 export(.table_styling_expr_to_row_number)
 export(add_difference)
@@ -95,6 +99,7 @@ export(style_sigfig)
 export(tbl_regression)
 export(tbl_stack)
 export(tbl_summary)
+export(tbl_uvregression)
 export(theme_gtsummary_compact)
 export(theme_gtsummary_continuous2)
 export(theme_gtsummary_eda)

diff --git a/R/add_n.tbl_regression.R b/R/add_n.tbl_regression.R
@@ -94,3 +94,7 @@ add_n.tbl_regression <- function(x, location = "label", ...) {
   x$call_list <- updated_call_list
   x
 }
+
+#' @export
+#' @rdname add_n_regression
+add_n.tbl_uvregression <- add_n.tbl_regression