Skip to content
Snippets Groups Projects
Verified Commit 79d8a549 authored by Laurent Modolo's avatar Laurent Modolo
Browse files

kmerclust_plot.R: reduce memory consumption

parent 1c0e4099
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/bin/kmerclust_plot.R
+ 3
− 1
View file @ 79d8a549
...@@ -3,7 +3,6 @@ library(ggplot2) ...@@ -3,7 +3,6 @@ library(ggplot2)
args <- commandArgs(trailingOnly = TRUE) args <- commandArgs(trailingOnly = TRUE)
print(args) print(args)
load(file = paste0(args[1], ".Rdata"))
load(file = paste0(args[1], "_boot.Rdata")) load(file = paste0(args[1], "_boot.Rdata"))
print(res) print(res)
...@@ -17,6 +16,9 @@ res %>% ...@@ -17,6 +16,9 @@ res %>%
geom_violin() + geom_violin() +
theme_bw() theme_bw()
ggsave(paste0(args[1], "_WSS_BSS.pdf")) ggsave(paste0(args[1], "_WSS_BSS.pdf"))
rm(res)
load(file = paste0(args[1], ".Rdata"))
count %>% count %>%
ggplot(aes(x = count_m, y = count_f)) + ggplot(aes(x = count_m, y = count_f)) +
theme_bw() theme_bw()
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment