Merge pull request #174 from sfcheung/fix_mod

Update to 0.2.3.1
sfcheung · Sep 27, 2024 · c02bf37 · c02bf37
2 parents 64849e4 + bb11eff
commit c02bf37
Show file tree

Hide file tree

Showing 4 changed files with 12 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: manymome
 Title: Mediation, Moderation and Moderated-Mediation After Model Fitting
-Version: 0.2.3
+Version: 0.2.3.1
 Authors@R:
     c(person(given = "Shu Fai",
            family = "Cheung",

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,12 @@
+# manymome 0.2.3.1
+
+## Bug Fixes
+
+- Fixed an issue related to
+  the internal function
+  `merge_model_matrix()` in some special
+  cases. (0.2.3.1)
+
 # manymome 0.2.3
 
 ## New Features

diff --git a/R/lm_helpers.R b/R/lm_helpers.R
@@ -72,7 +72,7 @@ merge_model_matrix <- function(outputs) {
     mm <- lapply(outputs,
                  function(x) {
                     out <- stats::model.matrix(x,
-                              contrasts.arg = x$contrasts)[, -1]
+                              contrasts.arg = x$contrasts)[, -1, drop = FALSE]
                     y_data <- get_response_data(x)
                     cbind(y_data, out)
                   })

diff --git a/README.md b/README.md
@@ -9,7 +9,7 @@
 [![R-CMD-check](https://github.com/sfcheung/manymome/actions/workflows/R-CMD-check.yaml/badge.svg)](https://github.com/sfcheung/manymome/actions/workflows/R-CMD-check.yaml)
 <!-- badges: end -->
 
-(Version 0.2.3, updated on 2024-09-25, [release history](https://sfcheung.github.io/manymome/news/index.html))
+(Version 0.2.3.1, updated on 2024-09-27, [release history](https://sfcheung.github.io/manymome/news/index.html))
 
 # manymome  <img src="man/figures/logo.png" align="right" height="150" />