Update cor_sort.R

easystats · Dec 1, 2024 · 0f29129 · 0f29129
1 parent 4f13dd5
commit 0f29129
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/cor_sort.R b/R/cor_sort.R
@@ -155,5 +155,5 @@ cor_sort.matrix <- function(x, distance = "correlation", hclust_method = "comple
   # Append any unused rows at the end
   refined_row_order <- c(refined_row_order, which(!used_rows))
 
-  list(row_order = refined_row_order, col_order = row_order)
+  list(row_order = rownames(m)[refined_row_order], col_order = colnames(m)[col_order])
 }