Adding ggplot2 choropleth section