allow for non-unique draw_ids in post-processing

paul-buerkner · Oct 30, 2024 · edecd11 · edecd11
1 parent f024203
commit edecd11
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -2,8 +2,8 @@ Package: brms
 Encoding: UTF-8
 Type: Package
 Title: Bayesian Regression Models using 'Stan'
-Version: 2.22.2
-Date: 2024-10-02
+Version: 2.22.3
+Date: 2024-10-30
 Authors@R:
     c(person("Paul-Christian", "Bürkner", email = "paul.buerkner@gmail.com",
              role = c("aut", "cre")),

diff --git a/R/prepare_predictions.R b/R/prepare_predictions.R
@@ -28,7 +28,7 @@ prepare_predictions.brmsfit <- function(
   resp <- validate_resp(resp, x)
   draw_ids <- validate_draw_ids(x, draw_ids, ndraws)
   draws <- as_draws_matrix(x)
-  draws <- suppressMessages(subset_draws(draws, draw = draw_ids))
+  draws <- suppressMessages(subset_draws(draws, draw = draw_ids, unique = FALSE))
   draws <- point_draws(draws, point_estimate, ndraws_point_estimate)
 
   sdata <- standata(

diff --git a/man/prepare_predictions.Rd b/man/prepare_predictions.Rd