diff bubbles_v9_NSAF_natural_log.R @ 4:8eb1dd926f6e draft

Uploaded

--- a/bubbles_v9_NSAF_natural_log.R	Tue Nov 17 10:57:45 2015 -0500
+++ b/bubbles_v9_NSAF_natural_log.R	Thu Nov 19 10:26:48 2015 -0500
@@ -227,8 +227,8 @@
   if( any(cutoff < 0 | cutoff > 1) ) stop('SAINT score cutoff not between 0 and 1. Please correct and try again')
 }
 
-#args <- commandArgs(trailingOnly = TRUE)
-#main(args[1],args[2],args[3],args[4],args[5],args[6],args[7],args[8],args[9])
+args <- commandArgs(trailingOnly = TRUE)
+main(args[1],args[2],args[3],args[4],args[5],args[6],args[7],args[8],args[9])
 
 #main("test_list.txt", "preytest.txt", crapome="craptest.txt", color="crapome", label=TRUE)
 #main("Crizo_list.txt", "prey_cr.txt", crapome = "crizo_crap.txt", color="crapome", label=TRUE, cutoff=0.7)