tests: irace 4.1.0

Author: be-marc

NEWS.md

@@ -1,5 +1,7 @@
 # bbotk (development version)
 
+
+
 # bbotk 1.4.1
 
 * compatibility: irace 4.0.0

R/OptimInstanceBatch.R

@@ -178,16 +178,16 @@ OptimInstanceBatch = R6Class("OptimInstanceBatch",
   )
 )
 
-objective_function = function(x, inst, maximization_to_minimization) {
+objective_function = function(x, inst, direction) {
   xs = set_names(as.list(x), inst$search_space$ids())
   inst$search_space$assert(xs)
   xdt = as.data.table(xs)
   res = inst$eval_batch(xdt)
   y = as.numeric(res[, inst$objective$codomain$target_ids, with = FALSE])
-  y * maximization_to_minimization
+  y * direction
 }
 
-objective_error = function(x, inst, maximization_to_minimization) {
+objective_error = function(x, inst, direction) {
   stop("$objective_function can only be called if search_space only
     contains numeric values")
 }

R/OptimizerBatchIrace.R

@@ -66,8 +66,8 @@
 #'
 #' @export
 #' @examples
-#' # currently there is bug in irace 4.0.0 that sometimes let the example crash
-#' \dontrun{
+#' # runtime of the example is too long
+#' \donttest{
 #'
 #' library(data.table)
 #'
@@ -96,7 +96,7 @@
 #' instance = OptimInstanceBatchSingleCrit$new(
 #'   objective = objective,
 #'   search_space = search_space,
-#'   terminator = trm("evals", n_evals = 1000))
+#'   terminator = trm("evals", n_evals = 96))
 #'
 #' # create instances of branin function
 #' instances = rnorm(10, mean = 0, sd = 0.1)

man/mlr_optimizers_irace.Rd

@@ -215,7 +215,7 @@ test_that("$clear() method works", {
 
   optimizer$optimize(inst)
   inst$clear()
-  expect_equal(inst, inst_copy)
+  suppressWarnings(expect_equal(inst, inst_copy))
 })
 
 test_that("context is initialized correctly", {

tests/testthat/test_OptimInstanceBatchSingleCrit.R

@@ -1,5 +1,4 @@
 test_that("OptimizerBatchIrace minimize works", {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   search_space = domain = ps(
@@ -40,7 +39,6 @@ test_that("OptimizerBatchIrace minimize works", {
 })
 
 test_that("OptimizerBatchIrace maximize works", {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   search_space = domain = ps(
@@ -81,7 +79,6 @@ test_that("OptimizerBatchIrace maximize works", {
 })
 
 test_that("OptimizerBatchIrace assertions works",  {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   search_space = domain = ps(
@@ -109,7 +106,6 @@ test_that("OptimizerBatchIrace assertions works",  {
 })
 
 test_that("OptimizerBatchIrace works with passed constants set",  {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   search_space = domain = ps(
@@ -135,7 +131,6 @@ test_that("OptimizerBatchIrace works with passed constants set",  {
 })
 
 test_that("OptimizerBatchIrace works without passed constants set",  {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   search_space = domain = ps(
@@ -162,7 +157,6 @@ test_that("OptimizerBatchIrace works without passed constants set",  {
 
 
 test_that("paradox_to_irace without dependencies", {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   # only ParamLgl
@@ -204,7 +198,6 @@ test_that("paradox_to_irace without dependencies", {
 })
 
 test_that("paradox_to_irace with dependencies", {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   # one dependency
@@ -257,7 +250,6 @@ test_that("paradox_to_irace with dependencies", {
 })
 
 test_that("paradox_to_irace works with parameters with multiple dependencies", {
-  skip_if(TRUE) # Remove this line when irace is fixed
   skip_if_not_installed("irace")
 
   pps = ps(