kmerclust_plot.R reduce the number of points for the scatter plot

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"))