fix issue #1685

paul-buerkner · Sep 9, 2024 · 8cdec67 · 8cdec67
1 parent 54bb6d0
commit 8cdec67
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/brmsframe.R b/R/brmsframe.R
@@ -34,7 +34,7 @@ brmsframe.brmsterms <- function(x, data, frame = NULL, basis = NULL, ...) {
     # this must be a multivariate model
     stopifnot(is.list(frame))
     x$frame <- frame
-    x$frame$re <- subset(x$frame$re, resp = x$resp)
+    x$frame$re <- subset2(x$frame$re, resp = x$resp)
   }
   data <- subset_data(data, x)
   x$frame$resp <- frame_resp(x, data = data)