The R Project SVN R

Rev

Rev 2195 | Rev 2763 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2195 Rev 2510
Line 1... Line 1...
1 
#!/bin/sh
 1 
#!/bin/sh
2 
#
 2 
#
3 
# ${RHOME}/bin/BATCH
 3 
# ${RHOME}/bin/BATCH
4 
 
 4 
 
5 
OPTS="--restore --save"
 5 
OPTS="--restore --save --no-readline"
6 
 
 6 
 
7 
while test -n "${1}"; do
 7 
while test -n "${1}"; do
8 
    case ${1} in
 8 
    case ${1} in
9 
	--) shift; break ;;
 9 
	--) shift; break ;;
10 
	-v|-n)
 10 
	-v|-n)
Line 15... Line 15...
15 
done
 15 
done
16 
 
 16 
 
17 
IN=${1}
 17 
IN=${1}
18 
OUT=${2-`basename ${1} .R`.Rout}
 18 
OUT=${2-`basename ${1} .R`.Rout}
19 
 
 19 
 
20 
(echo "invisible(options(echo = TRUE))"; \
 20 
(echo "invisible(options(echo = TRUE))"
21 
    cat ${IN}; \
 21 
 cat ${IN}
22 
    echo "proc.time()") \
 22 
 echo "proc.time()"
23 
    | ${RHOME}/bin/R ${OPTS} >${OUT} 2>&1
 23 
) | ${RHOME}/bin/R ${OPTS} >${OUT} 2>&1