fix test

larmarange · Nov 29, 2023 · 6b94c89 · 6b94c89
1 parent 4c7e745
commit 6b94c89
Showing 1 changed file with 3 additions and 6 deletions.
diff --git a/tests/testthat/test-identify_variables.R b/tests/testthat/test-identify_variables.R
@@ -587,7 +587,7 @@ test_that("model_identify_variables() works with glmmTMB::glmmTMB", {
 
   mod <- suppressWarnings(
     glmmTMB::glmmTMB(count ~ mined + spp,
-      ziformula = ~ mined + site,
+      ziformula = ~ mined,
       family = poisson,
       data = glmmTMB::Salamanders
     )
@@ -597,15 +597,12 @@ test_that("model_identify_variables() works with glmmTMB::glmmTMB", {
   expect_equivalent(
     res$variable,
     c(
-      NA, "mined", "spp", "spp", "spp", "spp", "spp", "spp", "site",
-      "site", "site", "site", "site", "site", "site", "site", "site",
-      "site", "site", "site", "site", "site", "site", "site", "site",
-      "site", "site", "site", "site", "site"
+      NA, "mined", "spp", "spp", "spp", "spp", "spp", "spp"
     )
   )
   expect_error(
     mod %>%
-      tidy_and_attach(tidy_fun = broom.mixed::tidy) %>%
+      tidy_and_attach() %>%
       tidy_identify_variables(),
     NA
   )