fix lmList4 tidier bug

bbolker · Aug 30, 2023 · f2a9b29 · f2a9b29
1 parent 2c2eaa0
commit f2a9b29
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/lme4_tidiers.R b/R/lme4_tidiers.R
@@ -553,7 +553,7 @@ tidy.lmList4 <- function(x, conf.int = FALSE,
                   dplyr::mutate(`terms` = dimnames(ss)$terms[i])
     }
     tmp <- dplyr::bind_rows(tmp)
-    tmp <- tmp[, unique(c("group", "terms"), sort(colnames(tmp)))]
+    tmp <- tmp[, unique(c("group", "terms", sort(colnames(tmp))))]
     tmp <- tmp[order(tmp$group, tmp$terms),]
     ret <- tibble::as_tibble(tmp)