# HG changeset patch # User bornea # Date 1447957595 18000 # Node ID 80cc85d7d6e39ec0b3976de9a776070212ccceee # Parent 79285a7acfbf782c28b239399fbd7e8995714ac3 Uploaded diff -r 79285a7acfbf -r 80cc85d7d6e3 bubbles_v9_NSAF_natural_log.R --- a/bubbles_v9_NSAF_natural_log.R Thu Nov 19 13:18:06 2015 -0500 +++ b/bubbles_v9_NSAF_natural_log.R Thu Nov 19 13:26:35 2015 -0500 @@ -227,6 +227,7 @@ cutoff_check <- function(cutoff){ if( any(cutoff < 0 | cutoff > 1) ) stop('SAINT score cutoff not between 0 and 1. Please correct and try again') } + ins_check_run <- function() { if ('dplyr' %in% rownames(installed.packages())){} else { @@ -242,7 +243,6 @@ } } -ins_check_run() args <- commandArgs(trailingOnly = TRUE) main(args[1],args[2],args[3],args[4],args[5],args[6],args[7],args[8],args[9])