add example with n_unweighted

r-causal · Feb 3, 2025 · 86a680b · 86a680b
1 parent 2b69253
commit 86a680b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/add_ess_header.R b/R/add_ess_header.R
@@ -21,7 +21,7 @@
 #'   add_ess_header()
 #'
 #' gtsummary::tbl_svysummary(svy, by = qsmk, include = c(age, sex, smokeyrs)) |>
-#'   add_ess_header(header = "**{level}**  \nN = {round(n, 1)} / {round(N, 1)}")
+#'   add_ess_header(header = "**{level}**  \nN = {n_unweighted}; \nESS = {round(n, 1)}")
 add_ess_header <- function(x, header = "**{level}**  \nESS = {round(n, 1)}") {
   # check inputs ---------------------------------------------------------------
   rlang::check_installed(c("cards", "dplyr"))