Making a Shiny App

Data

Going back to the crop data from 09/01/2020 because it has a lot of variables to work with within the Shiny framework.

Global Crop Yields

The data this week comes from Our World in Data. Note that there is a lot of data on that site, we’re looking at some subsets but feel free to use whatever data from there you find interesting! It’s all pretty clean and ready to go.

Let’s start by creating a static plot that we can extend within the Shiny app.

Wheat crop yield over time for Afghanistan (AFG), Guatemala (GTM), Spain (ESP), and New Zealand (NSL).

Using all of the countries and the eleven different types of crops, we can build a Shiny app to describe how the yields change over time.

The first chunk of Shiny code creates the interactive buttons that allow the user to specify what variables they want to use. The second chunk of Shiny code uses the input variables in the ggplot itself.

Year range:

Variable(s):

Wheat (tonnes per hectare) Rice (tonnes per hectare) Maize (tonnes per hectare) Soybeans (tonnes per hectare) Potatoes (tonnes per hectare) Beans (tonnes per hectare) Peas (tonnes per hectare) Cassava (tonnes per hectare) Barley (tonnes per hectare) Cocoa beans (tonnes per hectare) Bananas (tonnes per hectare)

Countries:

Afghanistan Africa Albania Algeria American Samoa Americas Angola Antigua and Barbuda Argentina Armenia Asia Asia, Central Australia Australia & New Zealand Austria Azerbaijan Bahamas Bahrain Bangladesh Barbados Belarus Belgium Belgium-Luxembourg Belize Benin Bermuda Bhutan Bolivia Bosnia and Herzegovina Botswana Brazil British Virgin Islands Brunei Bulgaria Burkina Faso Burundi Cambodia Cameroon Canada Cape Verde Caribbean Cayman Islands Central African Republic Central America Chad Chile China Colombia Comoros Congo Cook Islands Costa Rica Cote d'Ivoire Croatia Cuba Cyprus Czech Republic Czechoslovakia Democratic Republic of Congo Denmark Djibouti Dominica Dominican Republic Eastern Africa Eastern Asia Eastern Europe Ecuador Egypt El Salvador Equatorial Guinea Eritrea Estonia Ethiopia Ethiopia PDR Europe Europe, Western European Union Faeroe Islands Fiji Finland France French Guiana French Polynesia Gabon Gambia Georgia Germany Ghana Greece Grenada Guadeloupe Guam Guatemala Guinea Guinea-Bissau Guyana Haiti Honduras Hong Kong Hungary Iceland India Indonesia Iran Iraq Ireland Israel Italy Jamaica Japan Jordan Kazakhstan Kenya Kiribati Kuwait Kyrgyzstan Land Locked Developing Countries Laos Latvia Least Developed Countries Lebanon Lesotho Liberia Libya Lithuania Low Income Food Deficit Countries Luxembourg Macedonia Madagascar Malawi Malaysia Maldives Mali Malta Martinique Mauritania Mauritius Melanesia Mexico Micronesia (country) Micronesia (region) Middle Africa Moldova Mongolia Montenegro Montserrat Morocco Mozambique Myanmar Namibia Nepal Net Food Importing Developing Countries Netherlands New Caledonia New Zealand Nicaragua Niger Nigeria Niue North Korea Northern Africa Northern America Northern Europe Norway Oceania Oman Pacific Islands Trust Territory Pakistan Palestine Panama Papua New Guinea Paraguay Peru Philippines Poland Polynesia Portugal Puerto Rico Qatar Reunion Romania Russia Rwanda Saint Kitts and Nevis Saint Lucia Saint Vincent and the Grenadines Samoa Sao Tome and Principe Saudi Arabia Senegal Serbia Serbia and Montenegro Seychelles Sierra Leone Singapore Slovakia Slovenia Small island developing States Solomon Islands Somalia South Africa South America South Eastern Asia South Korea South Sudan Southern Africa Southern Asia Southern Europe Spain Sri Lanka Sudan Sudan (former) Suriname Swaziland Sweden Switzerland Syria Taiwan Tajikistan Tanzania Thailand Timor Togo Tokelau Tonga Trinidad and Tobago Tunisia Turkey Turkmenistan USSR Uganda Ukraine United Arab Emirates United Kingdom United States Uruguay Uzbekistan Vanuatu Venezuela Vietnam Wallis and Futuna Western Africa Western Asia Western Sahara World Yemen Yugoslavia Zambia Zimbabwe

[1] "You are phenomenal!"