The R Project SVN R

Rev

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

Rev 37649 Rev 40416
Line 1... Line 1...
1 
#!/bin/sh
 1 
#!/bin/sh
2 
#
 2 
#
3 
# ${R_HOME}/bin/BATCH
 3 
# ${R_HOME}/bin/BATCH
4 
 
 4 
 
5 
revision='$Rev: 37649 $'
 5 
revision='$Rev: 40416 $'
6 
version=`set - ${revision}; echo ${2}`
 6 
version=`set - ${revision}; echo ${2}`
7 
version="R batch front end ${version}
 7 
version="R batch front end ${version}
8 
 
 8 
 
9 
Copyright (C) 2000--2006 The R Core Development Team.
 9 
Copyright (C) 2000--2006 The R Core Development Team.
10 
This is free software; see the GNU General Public Licence version 2
 10 
This is free software; see the GNU General Public Licence version 2
Line 44... Line 44...
44 
done
 44 
done
45 
 
 45 
 
46 
in=${1}
 46 
in=${1}
47 
out=${2-`basename ${1} .R`.Rout}
 47 
out=${2-`basename ${1} .R`.Rout}
48 
 
 48 
 
49 
(echo "invisible(options(echo = TRUE))"
 49 
## this used to set options(echo=TRUE), but that is the default
- 
 
 50 
## except for --slave, and why inhibit the latter?
50 
  cat ${in}
 51 
(cat ${in}
51 
  echo ''; echo "proc.time()"
 52 
  echo ''; echo "proc.time()"
52 
) | ${R_HOME}/bin/R ${opts} ${R_BATCH_OPTIONS} >${out} 2>&1
 53 
) | ${R_HOME}/bin/R ${opts} ${R_BATCH_OPTIONS} >${out} 2>&1
53 
 
 54 
 
54 
### Local Variables: ***
 55 
### Local Variables: ***
55 
### mode: sh ***
 56 
### mode: sh ***