Which flavor do you want:

pdf("testmfrow.pdf")
par(mfrow=c(4,2))
x<-seq(1:10)
y1<-rnorm(10)
y2<-rnorm(10,mean=2,sd=1)
y3<-rnorm(10,mean=3,sd=1)
y4<-rnorm(10,mean=4,sd=1)
y5<-rnorm(10,mean=5,sd=1)
y6<-rnorm(10,mean=6,sd=1)
y7<-rnorm(10,mean=7,sd=1)
y8<-rnorm(10,mean=8,sd=1)
plot(x,y1,type='o', lty=1, main="I want this title is to be scaled down
(resized)", cex.main=.5, cex.axis=.5, cex.lab=.5)
plot(x,y2,type='o', lty=2, main="I want this title is to be scaled down
(resized)", cex.main=.75)
plot(x,y3,type='o', lty=3, main="I want this title is to be scaled down
(resized)", cex.main=.85)
plot(x,y4,type='o', lty=4, main="I want this title is to be scaled down
(resized)", cex.lab=.5, cex.main=.75)
plot(x,y5,type='o', lty=5, main="I want this title is to be scaled down
(resized)",cex=.75)
plot(x,y6,type='o', lty=6, main="I want this title is to be scaled down
(resized)")
plot(x,y7,type='o', lty=7, main="I want this title is to be scaled down
(resized)")
plot(x,y8,type='o', lty=8, main="I want this title is to be scaled down
(resized)")
dev.off()




On Tue, May 13, 2008 at 8:20 PM, Agus Susanto <[EMAIL PROTECTED]> wrote:

> Dear members,
> I want to create 8 graphs and write it into one page using mfrow=c(4,2).
> How to make all graphs (including the titles, legends, line types) to be
> scale down (resized proportionally).
> As an illustration, below is the code:
>
> pdf("testmfrow.pdf")
> par(mfrow=c(4,2))
>
> x<-seq(1:10)
> y1<-rnorm(10)
> y2<-rnorm(10,mean=2,sd=1)
> y3<-rnorm(10,mean=3,sd=1)
> y4<-rnorm(10,mean=4,sd=1)
> y5<-rnorm(10,mean=5,sd=1)
> y6<-rnorm(10,mean=6,sd=1)
> y7<-rnorm(10,mean=7,sd=1)
> y8<-rnorm(10,mean=8,sd=1)
>
> plot(x,y1,type='o', lty=1, main="I want this title is to be scaled down
> (resized)")
> plot(x,y2,type='o', lty=2, main="I want this title is to be scaled down
> (resized)")
> plot(x,y3,type='o', lty=3, main="I want this title is to be scaled down
> (resized)")
> plot(x,y4,type='o', lty=4, main="I want this title is to be scaled down
> (resized)")
> plot(x,y5,type='o', lty=5, main="I want this title is to be scaled down
> (resized)")
> plot(x,y6,type='o', lty=6, main="I want this title is to be scaled down
> (resized)")
> plot(x,y7,type='o', lty=7, main="I want this title is to be scaled down
> (resized)")
> plot(x,y8,type='o', lty=8, main="I want this title is to be scaled down
> (resized)")
>
> dev.off()
>
>
> Many thanks for any help/idea.
>
> Gusanto
>
>        [[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<http://www.r-project.org/posting-guide.html>
> and provide commented, minimal, self-contained, reproducible code.
>



-- 
Jim Holtman
Cincinnati, OH
+1 513 646 9390

What is the problem you are trying to solve?

        [[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.

Reply via email to