Mercurial > repos > matces > carpet_toolsuite
view carpet-src-1/tools/CARPET/r_wrapper2.sh @ 1:78770028dcf1 default tip
Migrated tool version 1.0.1 from old tool shed archive to new tool shed repository
author | matces |
---|---|
date | Tue, 07 Jun 2011 16:59:33 -0400 |
parents | cdd489d98766 |
children |
line wrap: on
line source
#!/bin/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 function 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 infile=$1; shift # 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 cat $infile > /tmp/sticazzi.R R --vanilla --slave -f $infile $* 2> /dev/null