deprecated tests

mi-erasmusmc · Oct 18, 2024 · 3439f7b · 3439f7b
1 parent a829d4a
commit 3439f7b
Show file tree

Hide file tree

Showing 5 changed files with 437 additions and 13 deletions.
diff --git a/tests/testthat/deprecated_tests/README.html b/tests/testthat/deprecated_tests/README.html
diff --git a/tests/testthat/deprecated_tests/README.md b/tests/testthat/deprecated_tests/README.md
@@ -0,0 +1,7 @@
+## test-MainFunctions.R
+
+* Initial testing Explore. No longer compatible with new results format. 
+
+## test-runExplore.R
+
+* Testing function later used in current tests. 
diff --git a/tests/testthat/test-MainFunctions.R → ...hat/deprecated_tests/test-MainFunctions.R b/tests/testthat/test-MainFunctions.R → ...hat/deprecated_tests/test-MainFunctions.R
diff --git a/tests/testthat/test-runExplore.R → ...stthat/deprecated_tests/test-runExplore.R b/tests/testthat/test-runExplore.R → ...stthat/deprecated_tests/test-runExplore.R
@@ -104,17 +104,4 @@ test_that("Test EndRulelength 5", {
 
 })
 
-test_that("getDataSetPath list cases", {
-
-  dataset <- "iris"
-  data_path <- getDataSetPath(dataset = dataset) 
-  expect_equal(data_path$class_feature, "'class'")
-
-  dataset <- "binary_3"
-  data_path <- getDataSetPath(dataset = dataset)
-  expect_equal(data_path$class_feature, "'outcomeCount'")
-
-  dataset <- "mix_4_ordered"
-  expect_error(getDataSetPath(dataset = dataset))
 
-})
diff --git a/tests/testthat/test-HelperFunctions.R b/tests/testthat/test-HelperFunctions.R
@@ -11,3 +11,18 @@ test_that("Convert logical to 0/1", {
   train_data <- convert_logical(train_data)
   expect_true(all(sapply(train_data, function(col) all(col %in% c(0, 1)))))
 })
+
+test_that("getDataSetPath list cases", {
+
+  dataset <- "iris"
+  data_path <- getDataSetPath(dataset = dataset) 
+  expect_equal(data_path$class_feature, "'class'")
+
+  dataset <- "binary_3"
+  data_path <- getDataSetPath(dataset = dataset)
+  expect_equal(data_path$class_feature, "'outcomeCount'")
+
+  dataset <- "mix_4_ordered"
+  expect_error(getDataSetPath(dataset = dataset))
+
+})