#if you haven't yet, install googleVis package as such:
#install.packages("googleVis")

#load the BarChart function
library("gvisBarChart")

#create BarChart
mdgBar <- gvisBarChart(data=mdg, xvar="NAME", yvar=c("AMOUNT"), options=list(title="Amount of Money Spent in Kenya to Fund Millenium Development Goals"))

#draw BarChart
plot(mdgBar)