comparison kaks_analysis_barplot.R @ 2:b4f599423810 draft

Uploaded
author greg
date Wed, 08 Mar 2017 09:08:50 -0500
parents 844acb833219
children 9ec2b94ff094
comparison
equal deleted inserted replaced
1:30430f2758fe 2:b4f599423810
1 #!/usr/bin/env Rscript 1 #!/usr/bin/env Rscript
2 2
3 suppressPackageStartupMessages(library("optparse")) 3 suppressPackageStartupMessages(library("optparse"))
4 4
5 option_list <- list( 5 option_list <- list(
6 make_option(c("-c", "--components"), action="store", dest="components", help="Ks significant components input dataset"), 6 make_option(c("-c", "--components", action="store", dest="components", help="Ks significant components input dataset"),
7 make_option(c("-o", "--output"), action="store", dest="output", default=NULL, help="Output dataset"), 7 make_option(c("-o", "--output", action="store", dest="output", default=NULL, help="Output dataset"),
8 ) 8 )
9 9
10 parser <- OptionParser(usage="%prog [options] file", option_list=option_list) 10 parser <- OptionParser(usage="%prog [options] file", option_list=option_list)
11 args <- parse_args(parser, positional_arguments=TRUE) 11 args <- parse_args(parser, positional_arguments=TRUE)
12 opt <- args$options 12 opt <- args$options