add test

easystats · Nov 21, 2023 · 54f64e2 · 54f64e2
1 parent c4465c1
commit 54f64e2
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/tests/testthat/test-r2.R b/tests/testthat/test-r2.R
@@ -39,3 +39,11 @@ test_that("r2 glm, ci", {
     tolerance = 1e-3
   )
 })
+
+test_that("r2 glmmTMB, no ranef", {
+  skip_if_not_installed("glmmTMB")
+  data(Owls, package = "glmmTMB")
+  m <- glmmTMB::glmmTMB(NegPerChick ~ BroodSize + ArrivalTime, data = Owls)
+  out <- r2(m)
+  expect_equal(out$R2, 0.05597288, tolerance = 1e-3, ignore_attr = TRUE)
+})