refactor: expect_vector => expect_numeric

mlr-org · Nov 18, 2024 · d457221 · d457221
1 parent 3bca203
commit d457221
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/tests/testthat/test_ensemble_fselect.R b/tests/testthat/test_ensemble_fselect.R
@@ -16,9 +16,9 @@ test_that("efs works", {
   expect_character(efsr$man)
   expect_data_table(efsr$result, nrows = 4)
   expect_list(efsr$result$features, any.missing = FALSE, len = 4)
-  expect_vector(efsr$result$n_features, size = 4)
-  expect_vector(efsr$result$classif.ce, size = 4)
-  expect_vector(efsr$result$classif.ce_inner, size = 4)
+  expect_numeric(efsr$result$n_features, len = 4)
+  expect_numeric(efsr$result$classif.ce, len = 4)
+  expect_numeric(efsr$result$classif.ce_inner, len = 4)
   expect_benchmark_result(efsr$benchmark_result)
   expect_equal(efsr$measure, "classif.ce")
   expect_true(efsr$minimize) # classification error
@@ -89,9 +89,9 @@ test_that("efs works with rfe", {
   expect_character(efsr$man)
   expect_data_table(efsr$result, nrows = 4)
   expect_list(efsr$result$features, any.missing = FALSE, len = 4)
-  expect_vector(efsr$result$n_features, size = 4)
-  expect_vector(efsr$result$classif.ce_inner, size = 4)
-  expect_vector(efsr$result$classif.acc, size = 4)
+  expect_numeric(efsr$result$n_features, len = 4)
+  expect_numeric(efsr$result$classif.ce_inner, len = 4)
+  expect_numeric(efsr$result$classif.acc, len = 4)
   expect_list(efsr$result$importance, any.missing = FALSE, len = 4)
   expect_benchmark_result(efsr$benchmark_result)
   expect_equal(efsr$measure, "classif.acc")