• In this presentation we introduce an interactive web application which provides statistical data about the countries in the European Union

• The application is hosted at https://vassitar.shinyapps.io/Shiny_App/

• The web application shows data about the countries in the European Union together with Norway, Switzerland, Iceland and Liechtenstein, which are either members of the European Free Trade Association (EFTA) or the Schengen Area

• The data is for 2014 and is taken from Eurostat

• The code can be viewed at https://github.com/vassitar/Shiny-Web-Application

• Select a parameter from the drop-down menu

• The interactive map (we use leaflet to generate the map) is redrawn so that it shows the values of the selected parameter

• Push one of the two buttons: "Box plot" or "Histogram"

• A red cross in the box plot represents the mean value

• If "Histogram" is chosen:
  • a slider appears
  • move the slider to set the number of bins (the optimal number of bins for each parameter is calculated according to the Freedman-Diaconis rule and is set by default as the initial value of the slider)

• Hover with the mouse over the map to see the name of the corresponding country together with the value of the chosen parameter for this country

• Markers are placed at the geographical location of each capital

• Click with the mouse on a marker to see the name of the respective capital

euro_countries <- read.csv(
    "D:/Coursera_Developing_Data_Products/Course_Project/european_countries.csv")

head(euro_countries[ , c("Country", "Population.Value", "Income.Value",
                         "Intentional.Homicide.Value",
                         "Healthcare.Expenditure.Value", "GDP.Value")])

         Country Population.Value Income.Value Intentional.Homicide.Value
1        Austria          8506889        23211                       0.47
2        Belgium         11180840        21705                       1.80
3       Bulgaria          7245677         3311                       1.60
4        Croatia          4246809         5225                       0.85
5         Cyprus           858000        14400                       1.17
6 Czech Republic         10512419         7622                       0.80
  Healthcare.Expenditure.Value GDP.Value
1                     25641.99  330417.6
2                     32360.19  400805.0
3                      1929.87   42762.2
4                      2170.23   42977.8
5                       523.44   17567.4
6                      9887.88  156660.0

• Population (Eurostat metadata on population)
• Income (Eurostat metadata on income and living conditions )
  • Median equivalised net income in euro
• Intentional Homicide Rate (Eurostat metadata on crime and criminal justice)
  • Per hundred thousand inhabitants
• Healthcare Expenditure (Eurostat metadata on health care expenditure)
  • In million euro
  • Government schemes and compulsory contributory health care financing schemes
• Unemployment Rate (Eurostat metadata on unemployment - LFS adjusted series)
  • Percentage of total population
• GDP (Eurostat metadata on annual national accounts)
  • Gross domestic product at market prices in million euro