knitr::opts_chunk$set(echo = TRUE, warning=FALSE, message=FALSE)
Die Schweiz ist bei Eurostat dabei. Wir schauen die jährlichen erstinstanzlichen Entscheidungen an (es gibt sonst noch Anträge, Dublin und so). Außerdem beschränken wir uns auf das Jahr 2017.
library(knitr) library(dplyr) migr_asydcfsta=readRDS(file="/tmp/migr_asydcfsta_20180812.rds")
geo_total_all=filter(migr_asydcfsta, time == "2017-01-01", decision == "TOTAL", sex == "T", age == "TOTAL", citizen == "TOTAL", geo != "EU28") %>% select(geo,values)
Dies sind alle 31 europäische Länder, die Eurostat mit Daten beliefern, mit ihrer Anzahl an Asylentscheidungen im Jahr 2017.
library(knitr) # sortieren geo_total_all_ordered <- arrange(geo_total_all, desc(values)) # Hervorheben CH chindex <- match("CH",geo_total_all_ordered$geo) #geo_total_all_chred <- geo_total_all_ordered #geo_total_all_chred[chindex,2] <- paste("\\color{red}{",geo_total_all_ordered$values[chindex],"}") #kable(geo_total_all_chred, caption = paste(" Entscheidungen zu Asylanträgen im Jahr 2017" ), "latex", escape = F) kable(geo_total_all_ordered, caption = paste(" Entscheidungen zu Asylanträgen im Jahr 2017" )) geo_total_all <- filter(geo_total_all, geo != "TOTAL")
Die Schweiz ist auf Platz r chindex-1
Nun sind die Länder verschieden groß. Wie sieht es aus, wenn man die Bevölkerung danebenstellt?
Aus welchen Ländern kamen die Asylsuchenden, über deren Anträge entschieden wurden?
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.