groupedBar(states03$Region)
groupedBar(states03$DeathPenalty, states03$Region, legend.loc = "topleft")
#Using a formula syntax:
groupedBar(~Region, data = states03)
groupedBar(DeathPenalty ~ Region, data = states03, legend.loc = "topleft")
Run the code above in your browser using DataLab