only consider colnames in condition

bips-hb · Feb 15, 2024 · ff122ce · ff122ce
1 parent b14e097
commit ff122ce
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -575,8 +575,8 @@ prep_cond <- function(condition, params, row_mode) {
   n_row_cond <- nrow(condition)
   meta <- params$meta
   cat <- params$cat
-  cnt_cols <-meta[family != "multinom", variable]
-  cat_cols <-meta[family == "multinom", variable]
+  cnt_cols <- intersect(meta[family != "multinom", variable], colnames(condition))
+  cat_cols <- intersect(meta[family == "multinom", variable], colnames(condition))
 
   cond <- copy(condition)
   cond <- setDT(cond)