fix print for p_significance

easystats · Sep 16, 2024 · 81cbdbc · 81cbdbc
1 parent 93de7a9
commit 81cbdbc
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/print.R b/R/print.R
@@ -100,7 +100,8 @@ print.p_significance <- function(x, digits = 2, ...) {
     caption <- "Practical Significance"
     out <- as.data.frame(do.call(rbind, threshold))
     colnames(out) <- c("ROPE_low", "ROPE_high")
-    x <- cbind(x, out)
+    x$ROPE_low <- out$ROPE_low
+    x$ROPE_high <- out$ROPE_high
     ci_string <- "ROPE"
   } else {
     caption <- sprintf(