diff --git a/DESCRIPTION b/DESCRIPTION
index 54a4b3d7..1c0919fe 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
 Type: Package
 Package: correlation
 Title: Methods for Correlation Analysis
-Version: 0.8.5.1
+Version: 0.8.5.2
 Authors@R:
     c(person(given = "Dominique",
              family = "Makowski",
@@ -54,10 +54,10 @@ BugReports: https://github.com/easystats/correlation/issues
 Depends:
     R (>= 3.6)
 Imports:
-    bayestestR (>= 0.14.0),
+    bayestestR (>= 0.15.0),
     datasets,
-    datawizard (>= 0.12.3),
-    insight (>= 0.20.4),
+    datawizard (>= 0.13.0),
+    insight (>= 0.20.5),
     parameters (>= 0.22.2),
     stats
 Suggests:
@@ -95,3 +95,4 @@ Config/Needs/website:
     rstudio/bslib,
     r-lib/pkgdown,
     easystats/easystatstemplate
+Remotes: easystats/bayestestR#678
diff --git a/R/utils_clean_data.R b/R/utils_clean_data.R
index e27418ec..bbb28631 100644
--- a/R/utils_clean_data.R
+++ b/R/utils_clean_data.R
@@ -2,7 +2,7 @@
 .clean_data <- function(data, include_factors = TRUE, multilevel = FALSE) {
   if (!multilevel) {
     if (include_factors) {
-      data <- datawizard::to_numeric(data)
+      data <- datawizard::to_numeric(data, dummy_factors = TRUE)
     } else {
       data <- data[sapply(data, is.numeric)]
     }
diff --git a/tests/testthat/_snaps/renaming.md b/tests/testthat/_snaps/renaming.md
index 614a332e..2fe9f676 100644
--- a/tests/testthat/_snaps/renaming.md
+++ b/tests/testthat/_snaps/renaming.md
@@ -1,10 +1,7 @@
 # renaming columns
 
     Code
-      correlation(anscombe, select = c("x1", "x2"), rename = c("var1"))
-    Condition
-      Warning:
-      Mismatch between number of variables and names.
+      print(out)
     Output
       # Correlation Matrix (pearson-method)
       
diff --git a/tests/testthat/test-renaming.R b/tests/testthat/test-renaming.R
index 2c18eec3..6cb7d79e 100644
--- a/tests/testthat/test-renaming.R
+++ b/tests/testthat/test-renaming.R
@@ -1,9 +1,12 @@
 test_that("renaming columns", {
   # should warn the user
-  expect_snapshot(correlation(anscombe,
-    select = c("x1", "x2"),
-    rename = c("var1")
-  ))
+  expect_warning({
+    out <- correlation(anscombe,
+      select = c("x1", "x2"),
+      rename = "var1"
+    )
+  })
+  expect_snapshot(print(out))
 
   expect_snapshot(correlation(anscombe,
     select = c("x1", "x2"),