adding logic to skip additional tests on CI

CostaLab · Dec 12, 2023 · 5f044ca · 5f044ca
1 parent 330f503
commit 5f044ca
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 0 deletions.
diff --git a/tests/testthat/test2-CimpleG-elasticnet.R b/tests/testthat/test2-CimpleG-elasticnet.R
@@ -1,5 +1,6 @@
 
 test_that("signatures and deconv w/ ElasticNet", {
+  skip_on_ci()
   set.seed(42)
   res <- suppressWarnings(CimpleG(
     train_data = train_data,

diff --git a/tests/testthat/test5-CimpleG-parab.R b/tests/testthat/test5-CimpleG-parab.R
@@ -1,5 +1,6 @@
 
 test_that("signatures are generated w/ CimpleG_parab", {
+  skip_on_ci()
   set.seed(42)
   res <- CimpleG(
     train_data = train_data,
@@ -18,6 +19,7 @@ test_that("signatures are generated w/ CimpleG_parab", {
 })
 
 test_that("signatures are generated w/ CimpleG_parab when providing single target column", {
+  skip_on_ci()
   set.seed(42)
   res <- CimpleG(
     train_data = train_data,
@@ -35,6 +37,7 @@ test_that("signatures are generated w/ CimpleG_parab when providing single targe
 })
 
 test_that("signatures are generated w/ CimpleG_parab when just train_only is set to TRUE", {
+  skip_on_ci()
   set.seed(42)
   res <- CimpleG(
     train_data = train_data,

diff --git a/tests/testthat/test8-CimpleG-plots.R b/tests/testthat/test8-CimpleG-plots.R
@@ -16,6 +16,7 @@ sig_list <-list(blood_cells="cg04785083", neurons="cg24548498")
 
 test_that("signature_plot works with CimpleG, character vectors and lists", {
 
+  skip_on_ci()
   plt_res <- signature_plot(res, test_data, test_targets, "gsm", "cell_type")
   plt_vec <- signature_plot(sig_vec, test_data, test_targets, "gsm", "cell_type")
   plt_list <- signature_plot(sig_list, test_data, test_targets, "gsm", "cell_type")