fix: focus search double shrinked tag

mlr-org · Jun 27, 2024 · 6ae723e · 6ae723e
1 parent d2046a2
commit 6ae723e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/OptimizerBatchFocusSearch.R b/R/OptimizerBatchFocusSearch.R
@@ -246,7 +246,7 @@ shrink_ps = function(param_set, x, check.feasible = FALSE) {
               # for ParamLgls we cannot specify levels; instead we set a default
               do.call(ps, structure(list(
                 p_lgl(special_vals = param$special_vals[[pid]],
-                  default = levels, tags = c(param$tags[[pid]], "shrinked"),
+                  default = levels, tags = unique(c(param$tags[[pid]], "shrinked")),
                   trafo = param_trafos[[pid]])
               ), names = pid))
             }