try skip_on_cran parallel tests

robingenuer · Jul 11, 2024 · a343492 · a343492
1 parent 5f25646
commit a343492
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test_iris_parallel.R b/tests/testthat/test_iris_parallel.R
@@ -1,6 +1,6 @@
 context("(skip on cran) Global VSURF parallel test for classification iris data")
 
-if (identical(Sys.getenv("NOT_CRAN"), "true")) {
+# if (identical(Sys.getenv("NOT_CRAN"), "true")) {
   set.seed(221921186, "L'Ecuyer-CMRG")
   data(iris)
   iris.vsurf <- VSURF(iris[,1:4], iris[,5],
@@ -9,7 +9,7 @@ if (identical(Sys.getenv("NOT_CRAN"), "true")) {
                       nfor.interp = 10, nfor.pred = 10,
                       parallel = TRUE, ncores = 2, clusterType = "FORK",
                       verbose = FALSE)
-}
+# }
 
 test_that("Selected variables for the 3 steps", {
   skip_on_cran()