snap updates

insightsengineering · Jan 23, 2024 · 6e57aa3 · 6e57aa3
1 parent cb94568
commit 6e57aa3
Show file tree

Hide file tree

Showing 2 changed files with 21 additions and 17 deletions.
diff --git a/tests/testthat/_snaps/ard_proportion_ci.md b/tests/testthat/_snaps/ard_proportion_ci.md
@@ -1,8 +1,7 @@
 # ard_proportion_ci(method='strat_wilson') works
 
     Code
-      ard_proportion_ci(data = data.frame(rsp = rsp, strata = interaction(strata_data)),
-      variables = rsp, strata = strata, weights = weights, method = "strat_wilson")
+      ard_proportion_ci_strat_wilson
     Message
       {cards} data frame: 1 x 8
     Output
@@ -14,8 +13,7 @@
 ---
 
     Code
-      ard_proportion_ci(data = data.frame(rsp = rsp, strata = interaction(strata_data)),
-      variables = rsp, strata = strata, weights = weights, method = "strat_wilsoncc")
+      ard_proportion_ci_strat_wilsoncc
     Message
       {cards} data frame: 1 x 8
     Output

diff --git a/tests/testthat/test-ard_proportion_ci.R b/tests/testthat/test-ard_proportion_ci.R
@@ -33,8 +33,9 @@ test_that("ard_proportion_ci(method='strat_wilson') works", {
 
   weights <- 1:6 / sum(1:6)
 
-  expect_snapshot(
-    ard_proportion_ci(
+  expect_error(
+    ard_proportion_ci_strat_wilson <-
+      ard_proportion_ci(
       data = data.frame(
         rsp = rsp,
         strata = interaction(strata_data)
@@ -43,19 +44,24 @@ test_that("ard_proportion_ci(method='strat_wilson') works", {
       strata = strata,
       weights = weights,
       method = "strat_wilson"
-    )
+    ),
+    NA
   )
+  expect_snapshot(ard_proportion_ci_strat_wilson)
 
-  expect_snapshot(
-    ard_proportion_ci(
-      data = data.frame(
-        rsp = rsp,
-        strata = interaction(strata_data)
+  expect_error(
+    ard_proportion_ci_strat_wilsoncc <-
+      ard_proportion_ci(
+        data = data.frame(
+          rsp = rsp,
+          strata = interaction(strata_data)
+        ),
+        variables = rsp,
+        strata = strata,
+        weights = weights,
+        method = "strat_wilsoncc"
       ),
-      variables = rsp,
-      strata = strata,
-      weights = weights,
-      method = "strat_wilsoncc"
-    )
+    NA
   )
+  expect_snapshot(ard_proportion_ci_strat_wilsoncc)
 })