Mercurial > repos > iuc > phyloseq_plot_richness
diff phyloseq_plot_richness.R @ 1:b6b41cf9c30a draft
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/phyloseq commit 10dfb1308ff858c6623c7dd9215a3bdf518427f9
| author | iuc |
|---|---|
| date | Tue, 03 Dec 2024 17:44:32 +0000 |
| parents | 7a27e9711e4e |
| children |
line wrap: on
line diff
--- a/phyloseq_plot_richness.R Thu Mar 03 13:26:59 2022 +0000 +++ b/phyloseq_plot_richness.R Tue Dec 03 17:44:32 2024 +0000 @@ -8,14 +8,12 @@ make_option(c("--output"), action = "store", dest = "output", help = "Output PDF") ) -parser <- OptionParser(usage = "%prog [options] file", option_list = option_list); -args <- parse_args(parser, positional_arguments = TRUE); -opt <- args$options; - -phyloseq_obj <- readRDS(opt$input); - +parser <- OptionParser(usage = "%prog [options] file", option_list = option_list) +args <- parse_args(parser, positional_arguments = TRUE) +opt <- args$options +phyloseq_obj <- readRDS(opt$input) # Start PDF device driver and generate the plot. -dev.new(); -pdf(file = opt$output); -plot_richness(phyloseq_obj, x = "samples", color = "samples"); +dev.new() +pdf(file = opt$output) +plot_richness(phyloseq_obj, x = "samples", color = "samples") dev.off()