Mercurial > repos > prog > lcmsmatching
comparison MsDbOutputStream.R @ 5:fb9c0409d85c draft
planemo upload for repository https://github.com/workflow4metabolomics/lcmsmatching.git commit 608d9e59a0d2dcf85a037968ddb2c61137fb9bce
author | prog |
---|---|
date | Wed, 19 Apr 2017 10:00:05 -0400 |
parents | e66bb061af06 |
children |
comparison
equal
deleted
inserted
replaced
4:b34c14151f25 | 5:fb9c0409d85c |
---|---|
5 | 5 |
6 ##################### | 6 ##################### |
7 # CLASS DECLARATION # | 7 # CLASS DECLARATION # |
8 ##################### | 8 ##################### |
9 | 9 |
10 MsDbOutputStream <- setRefClass("MsDbOutputStream", fields = list(.keep.unused = "logical", .one.line = "logical", .match.sep = "character", .output.fields = "ANY", .multval.field.sep = "character", .first.val = "logical", .ascii = "logical", .noapostrophe = "logical", .noplusminus = "logical", .nogreek = "logical")) | 10 MsDbOutputStream <- setRefClass("MsDbOutputStream", fields = list(.keep.unused = "logical", .one.line = "logical", .match.sep = "character", .multval.field.sep = "character", .first.val = "logical", .ascii = "logical", .noapostrophe = "logical", .noplusminus = "logical", .nogreek = "logical", .rtunit = 'character')) |
11 | 11 |
12 ############### | 12 ############### |
13 # CONSTRUCTOR # | 13 # CONSTRUCTOR # |
14 ############### | 14 ############### |
15 | 15 |
18 #' @param keep.unused Set to \code{TRUE} if you want to keep in the output, unused columns of the input. | 18 #' @param keep.unused Set to \code{TRUE} if you want to keep in the output, unused columns of the input. |
19 #' @param one.line Set to \code{TRUE} if you want to output only one line for each input line. | 19 #' @param one.line Set to \code{TRUE} if you want to output only one line for each input line. |
20 #' @return | 20 #' @return |
21 #' @examples | 21 #' @examples |
22 #' stream <- MsDbOutputDataFrameStream$new(one.line = TRUE) | 22 #' stream <- MsDbOutputDataFrameStream$new(one.line = TRUE) |
23 MsDbOutputStream$methods( initialize = function(keep.unused = FALSE, one.line = FALSE, match.sep = MSDB.DFT.MATCH.SEP, output.fields = msdb.get.dft.output.fields(), multval.field.sep = MSDB.DFT.OUTPUT.MULTIVAL.FIELD.SEP, first.val = FALSE, ascii = FALSE, noapostrophe = FALSE, noplusminus = FALSE, nogreek = FALSE, ...) { | 23 MsDbOutputStream$methods( initialize = function(keep.unused = FALSE, one.line = FALSE, match.sep = MSDB.DFT.MATCH.SEP, multval.field.sep = MSDB.DFT.OUTPUT.MULTIVAL.FIELD.SEP, first.val = FALSE, ascii = FALSE, noapostrophe = FALSE, noplusminus = FALSE, nogreek = FALSE, rtunit = MSDB.RTUNIT.SEC, ...) { |
24 | |
25 callSuper(...) | |
24 | 26 |
25 .keep.unused <<- keep.unused | 27 .keep.unused <<- keep.unused |
26 .one.line <<- one.line | 28 .one.line <<- one.line |
27 .match.sep <<- match.sep | 29 .match.sep <<- match.sep |
28 .output.fields <<- output.fields | |
29 .multval.field.sep <<- multval.field.sep | 30 .multval.field.sep <<- multval.field.sep |
30 .first.val <<- first.val | 31 .first.val <<- first.val |
31 .ascii <<- ascii | 32 .ascii <<- ascii |
32 .noapostrophe <<- noapostrophe | 33 .noapostrophe <<- noapostrophe |
33 .noplusminus <<- noplusminus | 34 .noplusminus <<- noplusminus |
34 .nogreek <<- nogreek | 35 .nogreek <<- nogreek |
35 | 36 .rtunit <<- rtunit |
36 callSuper(...) | |
37 }) | 37 }) |
38 | 38 |
39 ################# | 39 ################# |
40 # MATCHED PEAKS # | 40 # MATCHED PEAKS # |
41 ################# | 41 ################# |