Merge pull request #622 from singmann/patch-1

Small bug in `contr.equalprior_pairs`
easystats · Sep 7, 2023 · 2193a4f · 2193a4f
2 parents 7074d3c + d9add19
commit 2193a4f
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/contr.equalprior.R b/R/contr.equalprior.R
@@ -172,6 +172,7 @@ contr.equalprior <- function(n, contrasts = TRUE, sparse = FALSE) {
 #' @rdname contr.equalprior
 contr.equalprior_pairs <- function(n, contrasts = TRUE, sparse = FALSE) {
   contr <- contr.equalprior(n, contrasts, sparse) / sqrt(2)
+  contr
 }
 
 #' @export