From: Benjamin Auder <benjamin@auder>
Date: Wed, 30 Oct 2019 14:15:50 +0000 (+0100)
Subject: Fix typo
X-Git-Url: https://git.auder.net/img/vendor/scripts/current/git-logo.png?a=commitdiff_plain;h=e134ce3cadd68c3a888494cb6e683ab739e0df27;p=morpheus.git

Fix typo
---

diff --git a/reports/multistart.R b/reports/multistart.R
index 6f20436..6804b6b 100644
--- a/reports/multistart.R
+++ b/reports/multistart.R
@@ -58,7 +58,7 @@ testMultistart <- function(N, n, d, K, p, beta, b, link, nstart, ncores)
 			fargs
     }, N=N, ncores=ncores, verbose=TRUE)
   for (i in 1:2)
-    res[[i]] <- alignMatrices(mr[[i]], ref=rbind(p,beta,b), ls_mode="exact")
+    res[[i]] <- alignMatrices(res[[i]], ref=rbind(p,beta,b), ls_mode="exact")
   res
 }