Skip test on CRAN to be sure to meet time limit for NOTE <10s

AEBilgrau · Dec 12, 2018 · 58b86ae · 58b86ae
1 parent 566c1e7
commit 58b86ae
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/tests/testthat/test-plot.theta.R b/tests/testthat/test-plot.theta.R
@@ -4,6 +4,7 @@ theta <- rtheta(m = 2, d = 2)  # Create a random correctly formatted theta
 file <- tempfile(fileext = ".pdf")
 
 test_that("plotting theta objects works", {
+  skip_on_cran()
   pdf(file)
   out <- plot(theta, add.ellipses = TRUE)
   dev.off()