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 #################