powered by
Domestic
str(Domestic) attach(Domestic) names(Rate) <- Age barplot(Rate,col="gold") pie(Rate) detach(Domestic)
Run the code above in your browser using DataLab