diff metaMS_plot.r @ 2:96debae917e4 draft

planemo upload for repository https://github.com/workflow4metabolomics/metaMS commit c7a518686137f6d62b7415715152e8d5a9953ed7

--- a/metaMS_plot.r	Tue Jul 16 09:57:10 2019 -0400
+++ b/metaMS_plot.r	Fri Sep 06 06:12:08 2019 -0400
@@ -96,6 +96,12 @@
 
 if(!is.null(singlefile)) {
     files <- paste("./",names(singlefile),sep="")
+    #WARNING if user has CDF files (not yet good for plotting)
+    if(MSnbase:::isCdfFile(files)){
+        warning_message <- "You have CDF files, for the moment you can't obtain plot after runGC! A new update will follow with the good correction\n"
+        warning(warning_message)
+        cat(paste("\n","/!\\Warning/!\\",warning_message,sep="\n"))
+    }
     if(!is.null(files)){
         if(args$selectbpc){
             cat("\n\tProcessing BPC(s) from XCMS files...\n")