Mercurial > repos > brenninc > test_r_cairo_27aug2015
diff r_info.sh @ 0:07d42414fcee draft
Uploaded
author | brenninc |
---|---|
date | Thu, 27 Aug 2015 11:19:53 -0400 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/r_info.sh Thu Aug 27 11:19:53 2015 -0400 @@ -0,0 +1,30 @@ +#!/bin/sh + + +#Copied from https://github.com/galaxyproject/galaxy/blob/dev/tools/stats/r_wrapper.sh + +### Run R providing the R script in $1 as standard input and passing +### the remaining arguments on the command line + +# Function that writes a message to stderr and exits +fail() +{ + echo "$@" >&2 + exit 1 +} + +# Ensure R executable is found +which R > /dev/null || fail "'R' is required by this tool but was not found on path" + +# Extract first argument +rfile=$1 +package_file=$2 +version_file=$3 + +# Ensure the file exists +test -f $infile || fail "R input file '$infile' does not exist" + +# Invoke R passing file named by first argument to stdin +#Remove --slave for full R output +R --vanilla --slave --args $package_file < $rfile +echo "done"