Displaying 1 result from an estimated 1 matches for "autos_data".
2010 Aug 30
3
Putting legend *outside* plotting area
...ww.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*), c...