Hi there,

Try this:

par(mfrow=c(2,2))
for( i in 1:4 ) plot(1:10)
mtext("Title",side=3,outer=TRUE,padj=3)






----------------Contact
Details:-------------------------------------------------------
Contact me: Tal.Galili@gmail.com |  972-52-7275845
Read me: www.talgalili.com (Hebrew) | www.biostatistics.co.il (Hebrew) |
www.r-statistics.com (English)
----------------------------------------------------------------------------------------------




On Thu, Feb 25, 2010 at 10:43 PM, Greg Snow <Greg.Snow@imail.org> wrote:

> Try something like:
>
> > par(oma=c(0,0,3,0))
> <your plotting commands here>
> > mtext("your text here", outer=TRUE
>
> Hope this helps,
>
> --
> Gregory (Greg) L. Snow Ph.D.
> Statistical Data Center
> Intermountain Healthcare
> greg.snow@imail.org
> 801.408.8111
>
>
> > -----Original Message-----
> > From: r-help-bounces@r-project.org [mailto:r-help-bounces@r-
> > project.org] On Behalf Of FMH
> > Sent: Thursday, February 25, 2010 9:01 AM
> > To: r-help@r-project.org
> > Cc: r-sig-gr@stat.math.ethz.ch
> > Subject: [R] How to add a title to represent four different plot in lm
> > function
> >
> > Dear All,
> >
> > A linear regression model could be fitted by using lm function and the
> > plot function can be used to check the assumptions of the model. The
> > example is as followed.
> >
> > require(graphics)
> > ## Annette Dobson (1990) "An Introduction to Generalized Linear
> > Models".
> > ## Page 9: Plant Weight Data.
> > ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
> > trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
> > group <- gl(2,10,20, labels=c("Ctl","Trt"))
> > weight <- c(ctl, trt)
> > anova(lm.D9 <- lm(weight ~ group))
> > opar <- par(mfrow = c(2,2), oma = c(0, 0, 1.1, 0))
> > plot(lm.D9, las = 1)
> >
> > Could someone advice me the way to add a single title either at the
> > above or bottom of these 4 plots, entitled "The verification of model
> > assumtion via four different plots" ?
> >
> > Thanks
> > Fir
> >
> >
> >
> >
> > ______________________________________________
> > 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.
>
> ______________________________________________
> 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.
>

	[[alternative HTML version deleted]]

