From 94d5a9e1f3bf3b5e16c8784c6caa0d16040acb34 Mon Sep 17 00:00:00 2001
From: Simeon <51403284+simeross@users.noreply.github.com>
Date: Tue, 31 Oct 2023 12:41:42 +0100
Subject: [PATCH] Update count_clusters.R
---
R/count_clusters.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/R/count_clusters.R b/R/count_clusters.R
index 4a14635..48a55d7 100644
--- a/R/count_clusters.R
+++ b/R/count_clusters.R
@@ -35,7 +35,7 @@ count_clusters <- function(clus_tbl_list){
# Transform the data frame from wide to long using pivot_longer(), and create
# a new column called "threshold" with the values previously used as column names
# Rename the "value" column to "cluster_number" using dplyr::rename()
- clus_counts %>%
+ clus_counts <- clus_counts %>%
bind_rows() %>%
pivot_longer(everything()) %>%
mutate(threshold = as.numeric(name)) %>%
--
GitLab