Don't call library(rgenoud) in tests (#426)

Author: jakob-r

tests/testthat/test_mbo_km.R

@@ -42,9 +42,9 @@ test_that("mbo works with km", {
   ctrl = setMBOControlTermination(ctrl, iters = 5L)
   ctrl = setMBOControlInfill(ctrl, crit = crit.ei,
     opt.focussearch.points = 100L)
-  # expect no output at all for show.info = FALSE
-  library("rgenoud")
-  expect_silent({or = mbo(f, des, control = ctrl, show.info = FALSE)})
+  # FIXME: We need suppressPackageStartupMessages to suppress rgenoud startup message, as messages are not cought yet by mlr https://github.com/mlr-org/mlr/pull/2273
+
+  expect_silent(suppressPackageStartupMessages({or = mbo(f, des, control = ctrl, show.info = FALSE)}))
   expect_number(or$y)
   expect_equal(getOptPathLength(or$opt.path), 15)
   df = as.data.frame(or$opt.path)

vignettes/mlrMBO.Rmd

@@ -53,7 +53,7 @@ library(mlrMBO)
 
 1. Define **objective function** and its parameters using the package `smoof`.
 2. Generate **initial design** (optional).
-3. Define mlr` learner for **surrogate model** (optional).
+3. Define `mlr` learner for **surrogate model** (optional).
 4. Set up a **MBO control** object.
 5. Start the optimization with `mbo()`.