|
- #!/bin/bash
-
- # Wrapper to easily run an R script at the command line, with arguments,
- # like you're used to with Python/Perl/Ruby/Bash/anything else remotely sane.
- #
- # Usage:
- # $(echo $0) -p <program_name> <args>
-
- set -eu -o pipefail
-
- export LC_ALL=en_US.UTF-8
-
- # Find original directory of bash script, resolving symlinks
- # http://stackoverflow.com/questions/59895/can-a-bash-script-tell-what-directory-its-stored-in/246128#246128
- SOURCE="${BASH_SOURCE[0]}"
- while [ -h "$SOURCE" ]; do # resolve $SOURCE until the file is no longer a symlink
- DIR="$( cd -P "$( dirname "$SOURCE" )" && pwd )"
- SOURCE="$(readlink "$SOURCE")"
- [[ $SOURCE != /* ]] && SOURCE="$DIR/$SOURCE" # if $SOURCE was a relative symlink, we need to resolve it relative to the path where the symlink file was located
- done
- BINDIR="$( cd -P "$( dirname "$SOURCE" )" && pwd )"
- echo "Binary directory: ${BINDIR}"
-
- if [ -f "$BINDIR/cn.mops.R" ];then
- Rscript "$BINDIR/cn.mops.R" "$@"
- else
- echo "No such r script: $BINDIR/cn.mops.R"
- fi
|