# HG changeset patch # User tomnl # Date 1525339217 14400 # Node ID b37f97bda7600daa14795b40be33e56add6e39b7 # Parent 11ee7db33f60586faa6d98fafca3ab6b19a7ac62 planemo upload for repository https://github.com/computational-metabolomics/dma-tools-galaxy commit d4159f1962ef3fe37dd4f3047e4050afe013c15a-dirty diff -r 11ee7db33f60 -r b37f97bda760 cameradims.R --- a/cameradims.R Thu May 03 04:58:37 2018 -0400 +++ b/cameradims.R Thu May 03 05:20:17 2018 -0400 @@ -79,6 +79,15 @@ df <- df[df$i>opt$intensity_filter,] + +if (opt$rule_type=='extended_large'){ + if(opt$polarity=='pos'){ + opt$rule_path <- read.csv(system.file("rules", "CAMERA_rules_PosFinal_PlusLi.csv", package = "cameraDIMS"), header=TRUE) + }else{ + opt$rule_path <- read.csv(system.file("rules", "CAMERA_rules_NegFinal_PlusLi.csv", package = "cameraDIMS"), header=TRUE) + } +} + cameraOut <- cameraDIMS(data=df, params_iso=paramiso, params_adduct=paramadduct,