bugfix

slds-lmu · Apr 5, 2019 · 813c0fe · 813c0fe
1 parent 3847a05
commit 813c0fe
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/R/plotting.R b/R/plotting.R
@@ -18,8 +18,8 @@ paretoEdges <- function(fitness, refpoint) {
   front <- fitness[, nondominated(fitness), drop = FALSE]
   front <- front[, order(front[1, ]), drop = FALSE]
   frontpoints <- sapply(seq_len(ncol(front) * 2 - 1) + 1, function(twicecol) {
-    pmax(front[, floor(twicecol / 2)],
-      front[, ceiling(twicecol / 2)])
+    pmax(front[, floor(twicecol / 2), drop = FALSE],
+      front[, ceiling(twicecol / 2), drop = FALSE])
   })
 
   resmat <- cbind(c(front[1, 1], refpoint[2]),

diff --git a/experiments/testmm.sh b/experiments/testmm.sh
@@ -1,5 +1,5 @@
 #!/bin/sh
-export RNG=$1
+sleep 9999999
 Rscript - > "/projects/user/mosmafstraces/run_${RNG}.out" 2>&1 <<EOF
 options(warn = 1)
 suppressMessages({