Re: [R] function in order to plot the same graph to postscript and pdf

From: Ronny Klein <ronny.klein_at_wiwi.uni-halle.de>
Date: Thu 10 Mar 2005 - 04:21:41 EST

> > The myplot is something like this:
> >
> > plot(x)
> > text(foo)
>
> Aha, I was surprised that this worked for one of the two plots.
> You could pass myplot as an expression, e.g. myplot =
> expression(plot(x)), and then eval() that in the body of plot.both().

I've followed your advice and changed my function to something like this:

plot.both <- function{myplot, filename}{

     MYPLOT <- expression(myplot)
     pdf(file=paste(filename, ".pdf", sep=""))
     eval(myplot)
     dev.off()
     postscript(file=paste(filename, ".eps", sep=""))
     eval(myplot)

    dev.off()
 }

However the result is the same: the first one is actually printed but the second plot is empty.

Ronny



R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Thu Mar 10 04:30:12 2005

This archive was generated by hypermail 2.1.8 : Fri 03 Mar 2006 - 03:30:42 EST