src/bin/kmerclust_clust.R

@@ -17,13 +17,13 @@ res <- count %>%
 
 save(res, file = paste0(args[1], "_clust_", args[3], ".Rdata"))
 
-count %>%
-  mutate(
-    count_m = round(count_m),
-    count_f = round(count_f)
-  ) %>%
-  dplyr::filter(count_m + count_f > 0) %>%
-  dplyr::mutate(chromosome = res$chromosome) %>%
-  dplyr::select(name, chromsome) %>%
-  write_csv2(file = paste0(args[1], "_clust_", args[3], ".csv"))
+#count %>%
+#  mutate(
+#    count_m = round(count_m),
+#    count_f = round(count_f)
+#  ) %>%
+#  dplyr::filter(count_m + count_f > 0) %>%
+#  dplyr::mutate(chromosome = res$chromosome) %>%
+#  dplyr::select(name, chromsome) %>%
+#  write_csv2(file = paste0(args[1], "_clust_", args[3], ".csv"))
 

src/modules/kmerclust.nf

@@ -65,7 +65,7 @@ process KMERCLUST_CLUST {
 
     output:
     tuple val(specie), path("*.Rdata"), emit: rdata 
-    tuple val(specie), path("*.csv"), emit: csv 
+    // tuple val(specie), path("*.csv"), emit: csv 
     path "versions.yml"           , emit: versions
 
     script: