tests

5 years ago · 9281da95a1
2 changed files with 3 additions and 0 deletions
--- a/tests/test-all.R
+++ b/tests/test-all.R
@ -1,2 +1,3 @@
 library(testthat)
+
 test_check("ggchicklet")
--- a/tests/testthat/test-ggchicklet.R
+++ b/tests/testthat/test-ggchicklet.R
@ -15,6 +15,8 @@ test_that("chicklet geoms are created properly", {

  ggplot_build(gg) -> gb

+  ggplot_gtable(gb) -> gt
+
  expect_true(all(c("GeomChicklet", "GeomRrect") %in% class(gb$plot$layers[[1]]$geom)))