Update test-ard_proportion_ci.R

insightsengineering · May 25, 2024 · 18bb852 · 18bb852
1 parent fbd938f
commit 18bb852
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-ard_proportion_ci.R b/tests/testthat/test-ard_proportion_ci.R
@@ -51,7 +51,7 @@ test_that("ard_proportion_ci() works", {
     cards::get_ard_statistics(
       ard_factor,
       group1_level %in% 0,
-      map_lgl(variable_level, ~ .x == "10")
+      unlist(variable_level) == "10"
     )[c("estimate", "conf.low", "conf.high")],
     proportion_ci_wald(mtcars$cyl[mtcars$am == 0] == 10, correct = TRUE)[c("estimate", "conf.low", "conf.high")]
   )