diff --git a/mix.R b/mix.R
index 7219143fd3bce77997136064bfb9e22bd9ecee9d..29409ff9e49f53d1eae3da3e2aa275aa4c412f04 100644
--- a/mix.R
+++ b/mix.R
@@ -83,3 +83,5 @@ rmbmix.single<-function(fn_data,stgs_alist,fn_cmpd_list,wd,mode,readMethod="mzR"
     fn_arch<-file.path(archdir,paste(fn_data,".archive",sep=''))
     msmsWorkflow(w, mode=mode, steps=2:8,archivename=fn_arch)
 }
+
+rmbmix<- Vectorize(rmbmix.single,vectorize.args=c("fn_data","stgs_alist"))