powered by
Graduate
str(Graduate) attach(Graduate) names(Percent) <- School barplot(Percent,las=2,cex.names=.65,col="tomato") detach(Graduate)
Run the code above in your browser using DataLab