Mercurial > repos > greg > r_hello_world
comparison hello_world.R @ 5:a11f7a342777 draft
Uploaded
| author | greg |
|---|---|
| date | Mon, 15 Aug 2016 14:19:09 -0400 |
| parents | f3737c086298 |
| children | 24ccb9f7b637 |
comparison
equal
deleted
inserted
replaced
| 4:f3737c086298 | 5:a11f7a342777 |
|---|---|
| 1 #!/usr/bin/env Rscript | 1 #!/usr/bin/env Rscript |
| 2 | 2 |
| 3 suppressPackageStartupMessages(library("optparse")) | 3 suppressPackageStartupMessages(library("optparse")) |
| 4 | 4 |
| 5 | 5 |
| 6 option_list <- list( | 6 options_list <- list( |
| 7 make_option(c("-o", "--output"), action="store", help="Output dataset") | 7 make_option(c("-o", "--output"), action="store", help="Output dataset") |
| 8 ) | 8 ) |
| 9 | 9 |
| 10 parser <- OptionParser(usage="%prog [options] file", options_list) | 10 parser <- OptionParser(usage="%prog [options] file", options_list) |
| 11 args <- parse+args(parser, positional_arguments=TRUE) | 11 args <- parse+args(parser, positional_arguments=TRUE) |
