From f5a68697f98d94aec42eee41d41a349e17cd2d45 Mon Sep 17 00:00:00 2001
From: Laurent Modolo <laurent.modolo@ens-lyon.fr>
Date: Thu, 15 Jun 2023 10:47:40 +0200
Subject: [PATCH] kmerclust_plot.R reduce the number of points for the scatter
 plot

---
 src/bin/kmerclust_plot.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/bin/kmerclust_plot.R b/src/bin/kmerclust_plot.R
index 8f092d2..648eac3 100644
--- a/src/bin/kmerclust_plot.R
+++ b/src/bin/kmerclust_plot.R
@@ -20,6 +20,7 @@ rm(res)
 
 load(file = paste0(args[1], ".Rdata"))
 count %>%
+  sample_frac(0.1) %>%
   ggplot(aes(x = count_m, y = count_f)) +
   theme_bw()
 ggsave(paste0(args[1], "_scatter.pdf"))
-- 
GitLab