Use outer margins around the whole thing, see argument "oma" in ?par.
Uwe Ligges On 20.01.2010 17:53, Lars Skjærven wrote:
Dear R users, I'm making multiple plots within the same pdf page (par(mfcol = c(5,1)), and want a legend for this at the bottom of all the plots. From previous mails it has been suggested to use par(xpd=TRUE), increase the margin at the last plot, and then draw the legend. However, when I do this, the last plot gets smaller with the same amount I increase the margin with. The problem seems to be that legend() is drawing inside of the margins of the last plot. While what I want is to get this legend outside the margins. Or, extend the margins, without making the plot itself shrink... Any hints or tips will be greatly appreciated. Best regards, Lars ------ Here is my suggestion, which does not work too well: pdf("rmsd_open_closed.pdf", height=9) opar<- par(mfcol = c(4,1), mar=c(4,4,2,1) ) plot() plot() plot() par(mar=c(7,4,2,1)) plot() par(xpd=TRUE) legend(0, 8, c("black line", "red line"), col=c(1,2), lty=c(1,1)) par(opar) dev.off() [[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.
______________________________________________ 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.