Update ard_missing.survey.design.R

insightsengineering · Jun 14, 2024 · 20d2dca · 20d2dca
1 parent d1a777b
commit 20d2dca
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/ard_missing.survey.design.R b/R/ard_missing.survey.design.R
@@ -61,6 +61,10 @@ ard_missing.survey.design <- function(data,
     data$variables[variables],
     statistic = formals(asNamespace("cards")[["ard_missing.survey.design"]])[["statistic"]] |> eval()
   )
+  cards::fill_formula_selectors(
+    data$variables[variables],
+    stat_label = formals(asNamespace("cards")[["ard_missing.survey.design"]])[["stat_label"]] |> eval()
+  )
 
   stats_available <- c(
     "N_obs", "N_miss", "N_nonmiss", "p_miss", "p_nonmiss",