diff options
| author | Ken Kellner <ken@kenkellner.com> | 2019-02-06 15:53:26 -0500 |
|---|---|---|
| committer | Ken Kellner <ken@kenkellner.com> | 2019-02-06 15:53:26 -0500 |
| commit | fd856a819f689ef2070e1707a7d68ceb9c3f5d2b (patch) | |
| tree | 27daa7785f491b57c35dd41b1655f42172d06a54 | |
| parent | ef9990691bf8df56d8c68f6cccb172f07e268250 (diff) | |
Fix issue with differing number of adaption iterations between chains when running in parallel
| -rw-r--r-- | R/runparallel.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/runparallel.R b/R/runparallel.R index 64d9faf..579b7c0 100644 --- a/R/runparallel.R +++ b/R/runparallel.R @@ -54,7 +54,7 @@ total.adapt <- sufficient.adapt <- vector(length=n.chains) #Save samples and model objects from each cluster for (i in 1:n.chains){ - samples[[i]] <- par[[i]][[1]] + samples[[i]] <- coda::mcmc(par[[i]][[1]],start=n.burnin+n.thin,thin=n.thin) model[[i]] <- par[[i]][[2]] total.adapt[i] <- par[[i]][[3]] sufficient.adapt[i] <- par[[i]][[4]] |