Merge branch 'main' into n_in_data_modify

easystats · Sep 18, 2024 · a0dadf8 · a0dadf8
2 parents 3a86c48 + b4343f0
commit a0dadf8
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 4 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -11,6 +11,9 @@ CHANGES
   case, names are used as values for the `replacement` argument (i.e. `pattern`
   can be a character vector using `<new name> = "<old name>"`).
 
+* Minor additions to `reshape_ci()` to work with forthcoming changes in the
+  `{bayestestR}` package.
+
 # datawizard 0.12.3
 
 CHANGES

diff --git a/R/reshape_ci.R b/R/reshape_ci.R
@@ -45,13 +45,13 @@ reshape_ci <- function(x, ci_type = "CI") {
       if ("Parameter" %in% names(x)) {
         idvar <- "Parameter"
         remove_parameter <- FALSE
-      } else if (!is.null(attr(x, "idvars"))) {
-        idvar <- attr(x, "idvars")
-        remove_parameter <- FALSE
-      } else {
+      } else if (is.null(attr(x, "idvars"))) {
         idvar <- "Parameter"
         x$Parameter <- NA
         remove_parameter <- TRUE
+      } else {
+        idvar <- attr(x, "idvars")
+        remove_parameter <- FALSE
       }
 
       x <- stats::reshape(