silence name repair (#1182)

tidymodels · Dec 5, 2023 · a2b69a7 · a2b69a7
1 parent 0c695df
commit a2b69a7
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/R/list-svd-tidiers.R b/R/list-svd-tidiers.R
@@ -45,7 +45,7 @@ tidy_svd <- function(x, matrix = "u", ...) {
 
   if (matrix == "u") {
     ret <- x$u %>%
-      as_tibble(.name_repair = "unique") %>%
+      as_tibble(.name_repair = "unique_quiet") %>%
       tibble::rowid_to_column("row") %>%
       pivot_longer(
         cols = c(dplyr::everything(), -row),
@@ -65,8 +65,9 @@ tidy_svd <- function(x, matrix = "u", ...) {
         cumulative = cumsum(percent)
       )
   } else if (matrix == "v") {
+    # use unique_quiet to silence test in tidy_svd
     ret <- x$v %>%
-      as_tibble(.name_repair = "unique") %>%
+      as_tibble(.name_repair = "unique_quiet") %>%
       tibble::rowid_to_column("column") %>%
       pivot_longer(
         cols = c(dplyr::everything(), -column),