Mercurial > repos > bgruening > diffbind
changeset 7:fa67bcb732f6 draft
Uploaded
author | bgruening |
---|---|
date | Tue, 14 Jan 2014 05:04:34 -0500 |
parents | da65ae70e2e1 |
children | 7929c8b3f6f9 |
files | diffbind.R |
diffstat | 1 files changed, 9 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/diffbind.R Tue Jan 14 03:32:39 2014 -0500 +++ b/diffbind.R Tue Jan 14 05:04:34 2014 -0500 @@ -10,13 +10,14 @@ #get options, using the spec as defined by the enclosed list. #we read the options from the default: commandArgs(TRUE). spec = matrix(c( - 'verbose', 'v', 2, "integer", - 'help' , 'h', 0, "logical", - 'outfile' , 'o', 1, "character", - 'plots' , 'p', 2, "character", - 'infile' , 'i', 1, "character", - 'format', 'f', 1, 'character', + 'verbose', 'v', 2, "integer", + 'help' , 'h', 0, "logical", + 'outfile' , 'o', 1, "character", + 'plots' , 'p', 2, "character", + 'infile' , 'i', 1, "character", + 'format', 'f', 1, 'character' ), byrow=TRUE, ncol=4); + opt = getopt(spec); # if help was asked for print a friendly message @@ -27,9 +28,9 @@ } -library(DiffBind) +library('DiffBind') # used to save to BED, GFF or WIG format -library(rtracklayer) +library('rtracklayer') if ( !is.null(opt$plots) ) { pdf(opt$plots)