The R Project SVN R

Rev

Rev 55584 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
52964 maechler 1 
# ${R_HOME}/bin/Sweave -*- sh -*-
39141 hornik 2 
 
3 
R_EXE="${R_HOME}/bin/R"
52964 maechler 4 
 
77228 maechler 5 
R_SWEAVE_OPTIONS=${R_SWEAVE_OPTIONS:='--no-restore --no-echo'}
52964 maechler 6 
 
54995 ripley 7 
args=
8 
while test -n "${1}"; do
9 
  ## quote each argument here, unquote in R code.
10 
  args="${args}nextArg${1}"
11 
  shift
12 
done
13 
 
14 
echo "utils:::.Sweave()" | "${R_EXE}" $R_SWEAVE_OPTIONS --args ${args}