It still was not attached, but you can reduce the white space by reducing the margins using par(mar=c(...)).
If you do par(mar=c(0,0,0,0)), then there will be no space between the plots, using values larger than 0 will give space. But beware, you need to either suppress the plotting of axis labels/ticks or make them smaller and closer to the axes, or you will end up with the axis label for one plot inside of another. Hope this helps, -- Gregory (Greg) L. Snow Ph.D. Statistical Data Center Intermountain Healthcare greg.s...@imail.org 801.408.8111 > -----Original Message----- > From: r-help-boun...@r-project.org [mailto:r-help-boun...@r- > project.org] On Behalf Of Mark Na > Sent: Tuesday, July 28, 2009 4:53 PM > To: r-help@r-project.org > Subject: Re: [R] Make my plots bigger and reduce white space around > panels? > > The plot is attached this time... > > On Tue, Jul 28, 2009 at 4:47 PM, Mark Na <mtb...@gmail.com> wrote: > > > Hi, > > > > I have made a plot with panels (attached) using R code (below) and > I'd like > > to increase the size of each panel and decrease the white space, > especially > > the white space between: > > > > 1. rows of panels > > 2. the top panel and its title (which contains info on r2 and N) > > 3. each panel and its x label. > > > > I've dug around in the plot help files but can't seem to find how to > do > > this. > > > > Any help much appreciated, thanks! > > > > Mark Na > > > > > > > > > > #####ELEPHANT SPECIES RICHNESS > > par(mfrow=c(3,4),oma=c(0,0,2,0)) > > models<-list(data$SR.elephant.obs~data$AREA, > > log(data$SR.elephant.obs+1,10)~log(data$AREA,10), > > data$SR.elephant.obs~log(data$AREA,10), > > log(data$SR.elephant.obs+1,10)~data$AREA) > > for (i in 1:length(models)){ #SCATTERPLOT > > model<-lm(models[[i]]) > > plot(models[[i]],ylab="Elephant SR"); > > > abline(model);title(main=paste("r2=",round(summary(model)$r.squared,dig > its=3),", > > N=",dim(data)[1])) > > } > > for (i in 1:length(models)){#RESIDUALS VS FITTED VALUES PLOT > > model<-lm(models[[i]]) > > plot.lm(model,which=1,sub.caption=NA) > > } > > for (i in 1:length(models)){#Q-Q PLOT > > model<-lm(models[[i]]) > > plot.lm(model,which=2,sub.caption=NA) > > } > > title(main="ELEPHANT SPECIES RICHNESS",outer=TRUE); > > savePlot("SR_elephant.emf",type="emf"); dev.off() > > > > > > -- > Mark Na > University of Saskatchewan > Saskatoon, Canada ______________________________________________ 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.
