Mercurial > repos > tomnl > lcms_interval_scheduling

comparison cameradims.R @ 6:c48754ef58fa 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 fe424320c0b41d5eb18ed36892750ee9ae41bc0b-dirty
author tomnl
date Fri, 04 May 2018 10:20:25 -0400
parents fe2d05d5731a
children ca187035df43
comparison
equal deleted inserted replaced
5:c1413b109fb4 6:c48754ef58fa
77 77
78 df$i <- as.numeric(df$i) 78 df$i <- as.numeric(df$i)
79 79
80 df <- df[df$i>opt$intensity_filter,] 80 df <- df[df$i>opt$intensity_filter,]
81 81
82 if (nrow(df)==0){
83 print('No peaks left after filtering')
84 quit()
85 }
86
82 87
83 if (opt$rule_type=='extended_large'){ 88 if (opt$rule_type=='extended_large'){
84 89
85 rule_sep=',' 90 rule_sep=','
86 opt$rule_type <- 'user' 91 opt$rule_type <- 'user'