add test

easystats · Dec 30, 2024 · f759762 · f759762
1 parent b8406df
commit f759762
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/tests/testthat/test-demean.R b/tests/testthat/test-demean.R
@@ -46,6 +46,12 @@ test_that("demean works", {
     )
   )
   expect_snapshot(head(x))
+
+  df$Sepal.Length_within <- df$Sepal.Length
+  expect_error(
+    demean(df, select = c("Sepal.Length", "Petal.Length"), by = "ID"),
+    regex = "One or more of"
+  )
 })
 
 test_that("demean interaction term", {