Merge branch 'dev' into sparse_M

Cole-Monnahan-NOAA · May 31, 2024 · 1a28701 · 1a28701
2 parents eff7068 + 54066f1
commit 1a28701
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/utils.R b/R/utils.R
@@ -754,7 +754,7 @@ extract_sampler_params <- function(fit, inc_warmup=FALSE){
     its <- 1:length(ind)
   } else{
     ind <- -(1:fit$warmup)
-    its <- (1:length(ind)) + fit$warmup
+    its <- (1:nrow(x[[1]]))[ind]
   }
   y <- do.call(rbind, lapply(1:length(x), function(i)
     cbind(chain=i, iteration=its, x[[i]][ind,])))