fix tests for forthcoming fixest changes

easystats · Nov 24, 2023 · 927b74b · 927b74b
1 parent 49fe314
commit 927b74b
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Type: Package
 Package: insight
 Title: Easy Access to Model Information for Various Model Objects
-Version: 0.19.6.8
+Version: 0.19.6.9
 Authors@R: 
     c(person(given = "Daniel",
              family = "Lüdecke",
@@ -113,7 +113,7 @@ Suggests:
     epiR,
     estimatr,
     feisr,
-    fixest,
+    fixest (>= 0.11.2),
     fungible,
     gam,
     gamlss,

diff --git a/tests/testthat/test-fixest.R b/tests/testthat/test-fixest.R
@@ -1,6 +1,6 @@
 skip_on_os("mac")
 skip_if(getRversion() < "3.6.0")
-skip_if_not_installed("fixest")
+skip_if_not_installed("fixest", minimum_version = "0.11.2")
 skip_if_not_installed("carData")
 skip_if_not_installed("withr")
 
@@ -275,13 +275,13 @@ test_that("find_statistic", {
 test_that("get_statistic", {
   stat <- get_statistic(m1)
   out <- as.data.frame(summary(m1)$coeftable)
-  expect_equal(stat$Statistic, out[, "t value"], tolerance = 1e-3, ignore_attr = TRUE)
+  expect_equal(stat$Statistic, out[, "z value"], tolerance = 1e-3, ignore_attr = TRUE)
   stat <- get_statistic(m2)
   out <- as.data.frame(summary(m2)$coeftable)
-  expect_equal(stat$Statistic, out[, "t value"], tolerance = 1e-3, ignore_attr = TRUE)
+  expect_equal(stat$Statistic, out[, "z value"], tolerance = 1e-3, ignore_attr = TRUE)
   stat <- get_statistic(m3)
   out <- as.data.frame(summary(m3)$coeftable)
-  expect_equal(stat$Statistic, out[, "t value"], tolerance = 1e-3, ignore_attr = TRUE)
+  expect_equal(stat$Statistic, out[, "z value"], tolerance = 1e-3, ignore_attr = TRUE)
 })
 
 test_that("get_predicted", {