Merge branch 'feature/fix_regression_discrete_model_matrix' into develop

dmphillippo · Sep 20, 2024 · 9ecb244 · 9ecb244
2 parents 023a6e0 + cacfd5f
commit 9ecb244
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: multinma
 Title: Bayesian Network Meta-Analysis of Individual and Aggregate Data
-Version: 0.7.2.9001
+Version: 0.7.2.9002
 Authors@R: 
     person(given = c("David", "M."),
            family = "Phillippo",

diff --git a/R/nma.R b/R/nma.R
@@ -2951,7 +2951,7 @@ make_nma_model_matrix <- function(nma_formula,
 
     # Remove reference level columns if present
     if (!is.null(x_ref)) {
-      col_x_ref <- grepl(paste0("\\Q", xvar, x_ref, "\\E"), colnames(X_all), perl = TRUE)
+      col_x_ref <- grepl(paste0("(`?)\\Q", xvar, "\\E(`?)\\Q", x_ref, "\\E"), colnames(X_all), perl = TRUE)
       X_all <- X_all[, !col_x_ref, drop = FALSE]
     }
   }