Mercurial > repos > tomnl > lcms_interval_scheduling

comparison cameradims.R @ 3:091367e6e25f draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/computational-metabolomics/dma-tools-galaxy commit 578fd07833b93847193666c11744ba0bca1aaf57-dirty
author tomnl
date Thu, 03 May 2018 06:43:53 -0400
parents ac50ece6573e
children fe2d05d5731a
comparison
equal deleted inserted replaced
2:ac50ece6573e 3:091367e6e25f
79 79
80 df <- df[df$i>opt$intensity_filter,] 80 df <- df[df$i>opt$intensity_filter,]
81 81
82 82
83 if (opt$rule_type=='extended_large'){ 83 if (opt$rule_type=='extended_large'){
84 opt$rule_type <- 'user'
84 if(opt$polarity=='pos'){ 85 if(opt$polarity=='pos'){
85 opt$rule_path <- read.csv(system.file("rules", "CAMERA_rules_PosFinal_PlusLi.csv", package = "cameraDIMS"), header=TRUE) 86 opt$rule_path <- read.csv(system.file("rules", "CAMERA_rules_PosFinal_PlusLi.csv", package = "cameraDIMS"), header=TRUE)
86 }else{ 87 }else{
87 opt$rule_path <- read.csv(system.file("rules", "CAMERA_rules_NegFinal_PlusLi.csv", package = "cameraDIMS"), header=TRUE) 88 opt$rule_path <- read.csv(system.file("rules", "CAMERA_rules_NegFinal_PlusLi.csv", package = "cameraDIMS"), header=TRUE)
88 } 89 }