Created
March 20, 2017 18:54
-
-
Save TheDarkTrumpet/5de345fc3fc5636841eced6311a05edb to your computer and use it in GitHub Desktop.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # StateProvinceCode CityPopulation CityName | |
| # 1 IA 203433 Des Moines | |
| # 2 IA 126326 Cedar Rapids | |
| # 3 IA 99685 Davenport | |
| # 4 IA 82684 Sioux City | |
| # 5 IA 68406 Waterloo | |
| # 6 IA 67862 Iowa City | |
| # 7 IA 62230 Council Bluffs | |
| # 8 IA 58965 Ames | |
| # 9 IA 57637 Dubuque | |
| # 10 IA 56609 West Des Moines | |
| # 11 MN 382578 Minneapolis | |
| # 12 MN 285068 Saint Paul | |
| # 13 MN 106769 Rochester | |
| # 14 MN 86265 Duluth | |
| # 15 MN 82893 Bloomington | |
| # 16 MN 75781 Brooklyn Park | |
| # 17 MN 70576 Plymouth | |
| # 18 MN 65842 Saint Cloud | |
| # 19 MN 64206 Eagan | |
| # 20 MN 61961 Woodbury | |
| Top10Graph <- ggplot(data = IAMNTop10, | |
| aes(x=CityName, y=CityPopulation), | |
| ) + | |
| scale_x_discrete(limits = rev(levels(IAMNTop10$CityName))) + | |
| geom_bar(stat = "identity") | |
| Top10Graph + facet_grid(StateProvinceCode ~ ., scales="free", space="free") + coord_flip() |
Author
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
http://imgur.com/wpqWacW