Merge pull request #11 from teunbrand/ggplot2_3.5.0

Fix test for upcoming ggplot2 update
ThinkR-open · Feb 8, 2024 · 27aabb2 · 27aabb2
2 parents 93fec14 + 25a836f
commit 27aabb2
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/tests/testthat/test-ggplot.R b/tests/testthat/test-ggplot.R
@@ -1,10 +1,11 @@
 test_that("ggplot creation works", {
+  expected_length <- length(ggplot2::ggplot())
   lapply(
     1:100, function(x){
       a <- random_ggplot()
       expect_is(a, "gg")
       expect_is(a, "ggplot")
-      expect_length(a, 9)
+      expect_length(a, expected_length)
     }
   )