Mercurial > repos > greg > bmsb
comparison bmsb.R @ 16:a286e1d48b45 draft
Uploaded
| author | greg |
|---|---|
| date | Tue, 16 Aug 2016 11:36:16 -0400 |
| parents | 86dd2729766d |
| children | c6668285a216 |
comparison
equal
deleted
inserted
replaced
| 15:86dd2729766d | 16:a286e1d48b45 |
|---|---|
| 1 #!/usr/bin/env Rscript | 1 #!/usr/bin/env Rscript |
| 2 | 2 |
| 3 #suppressPackageStartupMessages(library("optparse")) | 3 #suppressPackageStartupMessages(library("optparse")) |
| 4 | 4 |
| 5 options_list <- list( | 5 options_list <- list( |
| 6 make_option(c("-s", "--save_log"), action="store_true", default=FALSE, help="Save R logs"), | |
| 7 make_option(c("-m", "--output_r_log"), help="Output dataset for R logs"), | |
| 8 make_option(c("-o", "--output"), help="Output dataset") | 6 make_option(c("-o", "--output"), help="Output dataset") |
| 9 ) | 7 ) |
| 10 | 8 |
| 11 parser <- OptionParser(usage="%prog [options] file", options_list) | 9 parser <- OptionParser(usage="%prog [options] file", options_list) |
| 12 args <- parse_args(parser, positional_arguments=TRUE) | 10 args <- parse_args(parser, positional_arguments=TRUE) |
