Fix typo
authorBenjamin Auder <benjamin@auder>
Wed, 30 Oct 2019 14:11:52 +0000 (15:11 +0100)
committerBenjamin Auder <benjamin@auder>
Wed, 30 Oct 2019 14:11:52 +0000 (15:11 +0100)
reports/multistart.R

index 252de91..6f20436 100644 (file)
@@ -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(ms[[i]], ref=rbind(p,beta,b), ls_mode="exact")
+    res[[i]] <- alignMatrices(mr[[i]], ref=rbind(p,beta,b), ls_mode="exact")
   res
 }