Merge pull request #1460 from fweber144/fix1459

Amend #1459
paul-buerkner · Feb 15, 2023 · d83de47 · d83de47
2 parents c793d9f + 11279ca
commit d83de47
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -19,7 +19,7 @@ via the new argument `ndraws_point_estimate`.
 * Fix Stan compilation issues for some of the more special 
 link functions such as `cauchit` or `softplus`.
 * Fix a bug for predictions in **projpred**, previously requiring more variables
-in `newdata` than necessary. (#1457, #1459)
+in `newdata` than necessary. (#1457, #1459, #1460)
 
 
 # brms 2.18.0

diff --git a/R/projpred.R b/R/projpred.R
@@ -241,7 +241,7 @@ get_refmodel.brmsfit <- function(object, newdata = NULL, resp = NULL,
   if (extract_y) {
     data <- current_data(
       object, newdata, resp = resp, check_response = TRUE,
-      allow_new_levels = TRUE, req_vars = character()
+      allow_new_levels = TRUE, req_vars = all.vars(bterms$respform)
     )
     y <- model.response(model.frame(bterms$respform, data, na.action = na.pass))
     y <- unname(y)