# HG changeset patch # User workflow4metabolomics # Date 1727698883 0 # Node ID 67f0ef6236f10180d4bd7cee41291bb3da8c01d3 # Parent db77f2b67a7f0b200dc1a90a5bcacbe4f9d269ac planemo upload commit a923a432239a1f2ffee2dae1281fe2d8f41bac38 diff -r db77f2b67a7f -r 67f0ef6236f1 CAMERA_annotateDiffreport.r --- a/CAMERA_annotateDiffreport.r Mon Sep 11 22:38:52 2023 +0000 +++ b/CAMERA_annotateDiffreport.r Mon Sep 30 12:21:23 2024 +0000 @@ -35,8 +35,8 @@ cat("\tARGUMENTS PROCESSING INFO\n") # Save arguments to generate a report -if (!exists("listOFargs")) listOFargs <- list() -listOFargs[[format(Sys.time(), "%y%m%d-%H:%M:%S_annotatediff")]] <- args +if (!exists("listOFlistArguments")) listOFlistArguments <- list() +listOFlistArguments[[format(Sys.time(), "%y%m%d-%H:%M:%S_annotatediff")]] <- args # We unzip automatically the chromatograms from the zip files. if (!exists("zipfile")) zipfile <- NULL @@ -73,7 +73,7 @@ cat("\n\n") # saving R data in .Rdata file to save the variables used in the present tool -objects2save <- c("xa", "variableMetadata", "diffrep", "cAnnot", "listOFargs", "zipfile", "singlefile") +objects2save <- c("xa", "variableMetadata", "diffrep", "cAnnot", "listOFlistArguments", "zipfile", "singlefile") save(list = objects2save[objects2save %in% ls()], file = "annotatediff.RData") cat("\n\n") diff -r db77f2b67a7f -r 67f0ef6236f1 abims_CAMERA_annotateDiffreport.xml --- a/abims_CAMERA_annotateDiffreport.xml Mon Sep 11 22:38:52 2023 +0000 +++ b/abims_CAMERA_annotateDiffreport.xml Mon Sep 30 12:21:23 2024 +0000 @@ -1,4 +1,4 @@ - + CAMERA annotate function. Returns annotation results (isotope peaks, adducts and fragments) and a diffreport if more than one condition.