Explicitly set mse in unit test.

bschneidr · Mar 9, 2024 · 33ddeb7 · 33ddeb7
1 parent d0bd14c
commit 33ddeb7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-calibrate_to_estimate.R b/tests/testthat/test-calibrate_to_estimate.R
@@ -7,10 +7,10 @@
   set.seed(1999)
 
   primary_survey <- svydesign(id=~dnum, weights=~pw, data=apiclus1, fpc=~fpc) |>
-    as.svrepdesign(type = "JK1")
+    as.svrepdesign(type = "JK1", mse = FALSE)
 
   control_survey <- svydesign(id = ~ 1, fpc = ~fpc, data = apisrs) |>
-    as.svrepdesign(type = "JK1")
+    as.svrepdesign(type = "JK1", mse = FALSE)
 
 test_that("Basic example gives correct results", {