Dear Lore,

The easiest thing to do is to write a function that saves your plot to a file 
and generates the latex code.

<<label=fig1, fig=FALSE, result = tex>>=
pdf("fig1.pdf", width = wid, heigth = hei)
        plot(1:10)
dev.off()
cat("\begin{figure}\")
cat("\includegraphics[width = ", wid, ", height = ", hei, "]{proj1-fig1}\"}
cat("\end{figure}")
@

HTH,

Thierry

----------------------------------------------------------------------------
ir. Thierry Onkelinx
Instituut voor natuur- en bosonderzoek / Research Institute for Nature and 
Forest
Cel biometrie, methodologie en kwaliteitszorg / Section biometrics, methodology 
and quality assurance
Gaverstraat 4
9500 Geraardsbergen
Belgium 
tel. + 32 54/436 185
thierry.onkel...@inbo.be 
www.inbo.be 

To call in the statistician after the experiment is done may be no more than 
asking him to perform a post-mortem examination: he may be able to say what the 
experiment died of.
~ Sir Ronald Aylmer Fisher

The plural of anecdote is not data.
~ Roger Brinner

The combination of some data and an aching desire for an answer does not ensure 
that a reasonable answer can be extracted from a given body of data.
~ John Tukey

-----Oorspronkelijk bericht-----
Van: r-help-boun...@r-project.org [mailto:r-help-boun...@r-project.org] Namens 
Lore M
Verzonden: woensdag 15 april 2009 13:46
Aan: wolfgang.raffelsber...@igbmc.fr; R Help
Onderwerp: Re: [R] using Sweave, how to save a plot in a given size


Yes it works, but I still have a problem.
The thing is that I know the dimensions of my plot but in the R code, not in 
the latex code. So I tried to do :

\SweaveOpts{prefix.string=proj1}

<<label=fig1,fig=T,include=F,width=\Sexpr{wid}, height=\Sexpr{hei}>>=
plot(1:10)
@

\begin{figure}
\includegraphics {proj1-fig1}           %% show
\end{figure}

But Latex doen't find the value of "wid" and "hei" when it creates the chunk 
code. But in the Latex code, it works and I do have the right value for "wid" 
and "hei".

Lore.


> Date: Tue, 14 Apr 2009 12:42:16 +0200
> From: wr...@titus.u-strasbg.fr
> To: tchiba...@hotmail.com
> CC: r-help@r-project.org
> Subject: Re: [R] using Sweave, how to save a plot in a given size
> 
> Hi I do somthing like:
> 
> \SweaveOpts{prefix.string=proj1}
> 
> <<label=fig1,fig=T,include=F,width=8, height=12>>=
> plot(1:10)
> @
> 
> \begin{figure}
> \includegraphics {proj1-fig1}           %% show
> \label{..}
> \end{figure}
> 
> 
> Wolfgang
> 
> 
> Lore M a écrit :
> >
> >
> >
> >
> >
> >
> > Hi,
> >  
> > I'm trying to realise a repport with R and Latex (TeXnicCenter and Miktex 
> > for Windows) using Sweave(). 
> > I'd like to save my plots in a given size. How can I do that ? The code is :
> >  
> > \SweaveOpts{prefix.string = figs/plot, eps = FALSE, pdf = TRUE}
> > <<partI, echo=FALSE ,fig=TRUE, include=FALSE>>= 
> > plotFunction()
> > @
> > \includepdf[pages=-]{figs/plot-partI}
> >
> > When I use par(pin=c(width,height)), I get the plot with the right size but 
> > saved in a too big pdf page (7in x 7in, the default size of the window).
> > So I tried to change the size of the window with the command windows() but 
> > then, Sweave can't save the plot correctly.
> >
> > Thanks everyone.
> >  
> > Lore.
> > _________________________________________________________________
> >
> > ? Lancez-vous !
> >
> >     [[alternative HTML version deleted]]
> >
> > ______________________________________________
> > R-help@r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
> >
> >
> >   
> 
> 
> -- 
> . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
> Wolfgang Raffelsberger, PhD
> Laboratoire de BioInformatique et Génomique Intégratives
> CNRS UMR7104, IGBMC 
> 1 rue Laurent Fries,  67404 Illkirch  Strasbourg,  France
> Tel (+33) 388 65 3300         Fax (+33) 388 65 3276
> wolfgang.raffelsberger (at) igbmc.fr 
> 
> 
> 

_________________________________________________________________

[[elided Hotmail spam]]

        [[alternative HTML version deleted]]


Dit bericht en eventuele bijlagen geven enkel de visie van de schrijver weer 
en binden het INBO onder geen enkel beding, zolang dit bericht niet bevestigd is
door een geldig ondertekend document. The views expressed in  this message 
and any annex are purely those of the writer and may not be regarded as stating 
an official position of INBO, as long as the message is not confirmed by a duly 
signed document.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to