From e134ce3cadd68c3a888494cb6e683ab739e0df27 Mon Sep 17 00:00:00 2001
From: Benjamin Auder <benjamin@auder>
Date: Wed, 30 Oct 2019 15:15:50 +0100
Subject: [PATCH] Fix typo

---
 reports/multistart.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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
 }
 
-- 
2.44.0