add test

easystats · Feb 10, 2025 · 3255a33 · 3255a33
1 parent 732900e
commit 3255a33
Show file tree

Hide file tree

Showing 2 changed files with 92 additions and 1 deletion.
diff --git a/tests/testthat/_snaps/plot-ordinal/plot-ordinal-2.svg b/tests/testthat/_snaps/plot-ordinal/plot-ordinal-2.svg
diff --git a/tests/testthat/test-plot-ordinal.R b/tests/testthat/test-plot-ordinal.R
@@ -9,10 +9,16 @@ skip_on_cran()
 test_that("plots ordinal", {
   m <- MASS::polr(Species ~ Sepal.Width, data = iris)
   out <- estimate_means(m, by = "Sepal.Width")
-
   set.seed(123)
   vdiffr::expect_doppelganger(
     "plot-ordinal-1",
     plot(out, show_data = FALSE)
   )
+
+  out <- estimate_relation(m, by = "Sepal.Width")
+  set.seed(123)
+  vdiffr::expect_doppelganger(
+    "plot-ordinal-2",
+    plot(out, show_data = FALSE)
+  )
 })