This is probably the same underlying bug, but it is not caused by
semicolons.
If you use keep,soure=TRUE with expand=FALSE and interpolate a code
chunk, the name of the chunkl is sent to the TeX file once for every
line in the chunk. Specifically, the source file:
%%%%%%%%%%%
\documentclass{article}
\begin{document}
<<example>>=
x <- 1
y <- 2
x+y
@
<<keep.source=TRUE,expand=FALSE>>=
<<example>>
@
\end{document}
%%%%%%%%%%%
produces the output LaTeX file:
%%%%%%%%%%%
\documentclass{article}
\usepackage{Sweave}
\begin{document}
\begin{Schunk}
\begin{Sinput}
> x <- 1
> y <- 2
> x + y
\end{Sinput}
\begin{Soutput}
[1] 3
\end{Soutput}
\end{Schunk}
\begin{Schunk}
\begin{Sinput}
> <<example>>
> <<example>>
> <<example>>
\end{Sinput}
\begin{Soutput}
[1] 3
\end{Soutput}
\end{Schunk}
\end{document}
%%%%%%%%%%%
On 2/4/2011 7:56 AM, Duncan Murdoch wrote:
Thanks for the report. I'll take a look.
I'm now past one major time sink, and will have some time to catch up
on old problems; I'll add this to that list.
Duncan Murdoch
On 03/02/2011 7:09 PM, John Maindonald wrote:
The following is 'semicolon.Rnw'
> \SweaveOpts{engine=R, keep.source=TRUE}
>
> <<xycig-A, eval=f, echo=f>>=
> library(SMIR); data(bronchit); library(KernSmooth)
> @ %
>
> Code for panel A is
> <<code-xycig-A, eval=f, echo=t>>=
> <<xycig-A>>
> @ %
Sweave("semicolon") yields the following 'semicolon.tex'
> Code for panel A is
> \begin{Schunk}
> \begin{Sinput}
>> library(SMIR); data(bronchit); library(KernSmooth)
>> library(SMIR); data(bronchit); library(KernSmooth)
>> library(SMIR); data(bronchit); library(KernSmooth)
> \end{Sinput}
> \end{Schunk}
(I have omitted three blank lines at the start)
With keep.source=FALSE, the commands are split onto
separate lines, and there is no repetition.
John Maindonald email: john.maindon...@anu.edu.au
phone : +61 2 (6125)3473 fax : +61 2(6125)5549
Centre for Mathematics& Its Applications, Room 1194,
John Dedman Mathematical Sciences Building (Building 27)
Australian National University, Canberra ACT 0200.
http://www.maths.anu.edu.au/~johnm
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
