* R/race.R: fix false assert failure.

MLopez-Ibanez · Mar 3, 2024 · b117347 · b117347
1 parent 94c6986
commit b117347
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/race.R b/R/race.R
@@ -1065,7 +1065,7 @@ elitist_race <- function(maxExp = 0,
                                  vtimes, 
                                  if (is.null(final.bounds)) NA else final.bounds[which.exe]))
 
-    irace.assert(anyDuplicated(experimentLog[, c("instance", "configuration")]) == 0L,
+    irace.assert(anyDuplicated(experimentLog[, c("instance", "configuration"), drop = FALSE]) == 0L,
       eval.after = {
         print(experimentLog)
         print(mget(ls()))