From 569a5790c2f8cca4dc6d8c5a53bd3b7a9f65441f Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Tue, 13 Sep 2022 09:27:42 +0200
Subject: More work on multistart

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

(limited to 'R/multistart.R')

diff --git a/R/multistart.R b/R/multistart.R
index fb31d002..a3afa08b 100644
--- a/R/multistart.R
+++ b/R/multistart.R
@@ -39,6 +39,7 @@ multistart.saem.mmkin <- function(object, n = 50, cores = 1, ...) {
   res <- parallel::mclapply(1:n, function(x) {
     update(object, degparms_start = start_parms[x, ], ...)
   }, mc.cores = cores)
+  attr(res, "start_parms") <- start_parms
   class(res) <- c("multistart.saem.mmkin", "multistart")
   return(res)
 }
-- 
cgit v1.2.1