Is there a simple way to put a legend outside the plot area for a simple plot?
I found... (at http://www.harding.edu/fmccown/R/) # Expand right side of clipping rect to make room for the legend *par(xpd=T, mar=par()$mar+c(0,0,0,4))* # Graph autos (transposing the matrix) using heat colors, # put 10% of the space between each bar, and make labels # smaller with horizontal y-axis labels barplot(*t*(autos_data), main="Autos", ylab="Total", col=*heat.colors(3), space=0.1, cex.axis=0.8, las=1, names.arg=c("Mon","Tue","Wed","Thu","Fri"), cex=0.8*) # Place the legend at (6,30) using heat colors legend(*6, 30,* names(*autos_data*), cex=*0.8*, fill=*heat.colors(3)*); But I do not understand *par(xpd=T, mar=par()$mar+c(0,0,0,4))* Anyway it does not work for me when I change... > y1 <- runif(100, max=1, min=0) > y2 <- rnorm(100) > ylim <- c(min(y1, y2), max(y1,y2)) > plot(x, y1, pch=1, ylim=ylim) > points(x, y2, pch=2) > legend("topleft", legend=c("Uniform", "Normal"), pch=c(1,2)) To > par(xpd=T, mar=par()$mar+c(0,0,0,4)) > plot(x, y1, pch=1, ylim=ylim) > points(x, y2, pch=2) > legend(6, 30, legend=c("Uniform", "Normal"), pch=c(1,2)) I do not get to see the legend at all. I am confused.... cheers Worik [[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.
