add test

easystats · Oct 2, 2024 · 0f377ca · 0f377ca
1 parent fd2f89b
commit 0f377ca
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/tests/testthat/test-categorize.R b/tests/testthat/test-categorize.R
@@ -240,5 +240,13 @@ test_that("categorize labelling ranged", {
   expect_snapshot(categorize(mtcars$mpg, "equal_length", n_groups = 5))
   expect_snapshot(categorize(mtcars$mpg, "equal_length", n_groups = 5, labels = "range"))
   expect_snapshot(categorize(mtcars$mpg, "equal_length", n_groups = 5, labels = "observed"))
+})
+
+test_that("categorize breaks", {
+  data(mtcars)
   expect_snapshot(categorize(mtcars$mpg, "equal_length", n_groups = 5, labels = "observed", breaks = "inclusive"))
+  expect_error(
+    categorize(mtcars$mpg, "equal_length", n_groups = 5, breaks = "something"),
+    regex = "should be one of"
+  )
 })