fixing missing .var

insightsengineering · Sep 12, 2022 · e06fcd9 · e06fcd9
1 parent d5cf6ae
commit e06fcd9
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/R/estimate_proportion.R b/R/estimate_proportion.R
@@ -429,7 +429,7 @@ s_proportion <- function(df,
   } else if (checkmate::test_subset(method, c("strat_wilson", "strat_wilsonc"))) {
     stop("To use stratified methods you need to specify the strata variables.")
   }
-  if (missing(.var)) {
+  if (checkmate::test_atomic_vector(df)) {
     rsp <- as.logical(df)
   } else {
     rsp <- as.logical(df[[.var]])

diff --git a/man/estimate_proportions.Rd b/man/estimate_proportions.Rd