[Rd] keep.source when semicolons separate statements on the one line

[Kevin R. Coombes]

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.maindonald at 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 at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-devel
>
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel