diff --git a/R/mix.R b/R/mix.R index 6f652a16a928888c8d004bbbf34f6de6f24b0ebf..9585ad49fb39d834b05654d03352e6c9527c5835 100644 --- a/R/mix.R +++ b/R/mix.R @@ -117,7 +117,7 @@ single.sw<-function(fn_data,stgs_alist,wd,fn_cmpd_list,mode,readMethod="mzR",arc archdir<-file.path(wd,archdir) if (!dir.exists(archdir)) dir.create(archdir) fn_arch<-file.path(archdir,paste(fn_data,".archive",sep='')) - RMassBank::msmsWorkflow(w, mode=mode, steps=2:7,archivename=fn_arch) + RMassBank::msmsWorkflow(w, mode=mode, steps=2:lastStep,archivename=fn_arch) }