jorgeassis
5/14/2020 - 9:34 AM

barPlot

# Bar Plot

mainTheme <- theme(panel.grid.major = element_blank() ,
                   text = element_text(size=12) ,
                   axis.title.y = element_text(margin = margin(t = 0, r = 12, b = 0, l = 0)) ,
                   axis.title.x = element_text(margin = margin(t = 12, r = 0, b = 0, l = 0)) )

deforestationPlot <-ggplot(data=deforestation, aes(x=Year, y=Loss)) +
  geom_bar(stat="identity", fill="#669b90") + ylab("Annual deforestation (thousands km2)") + mainTheme