Short introduction to the data

The data is based on yearly reports from the EEA (European Environment Agency) concerned with the air quality in Europe. In particular the reports establish a link between the air quality and premature death on a country-by-country basis. Premature death is defined as death before reaching an expected age. This expected age is typically the life expectancy for a country stratified by sex.

The data contains the following information:

premature_death <- read_csv("https://asta.math.aau.dk/datasets/?file=PrematureDeath.csv") 
## Parsed with column specification:
## cols(
##   Year = col_double(),
##   Country = col_character(),
##   Population = col_double(),
##   PM25 = col_double(),
##   NO2 = col_double(),
##   O3 = col_double(),
##   O3F = col_character(),
##   PrematureDeath = col_double()
## )
premature_death
## # A tibble: 82 x 8
##     Year Country  Population  PM25   NO2    O3 O3F   PrematureDeath
##    <dbl> <chr>         <dbl> <dbl> <dbl> <dbl> <chr>          <dbl>
##  1  2015 Austria        8576  13.3  19.8  6170 High            7480
##  2  2015 Belgium       11237  13    20.9  2790 Low             9120
##  3  2015 Bulgaria       7202  24.1  16.1  4180 High           15190
##  4  2015 Croatia        4225  17.4  17.3  6240 High            5160
##  5  2015 Cyprus         1173  16.9  14.1  6390 High             820
##  6  2015 Czechia       10538  17    16.6  5560 High           11050
##  7  2015 Denmark        5660   9.7  10.5  2200 Low             2970
##  8  2015 Estonia        1315   6.7   8.2  1780 Low              585
##  9  2015 Finland        5472   5.3   8.8  1360 Low             1590
## 10  2015 France        66488  11.9  17.9  4250 High           47300
## # … with 72 more rows