add citypop ggplot graphs

3 graphs
1) citypop grouped by top 5 cities