File:Abschiebungen.svg

Description
Deutsch: Entwicklung von Asylanträgen, Abschiebungen und Anerkennungen von Asylberechtigen nach Art. 16/16a GG
Date
Source

Own work, data from Migrationsbericht 2020

Das Bundesamt in Zahlen 2022 - Modul Asyl
Author Kopiersperre (talk), R code from Europol at German Wikipedia, Hi, future humans! (talk · contribs)
Permission
(Reusing this file)
w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 4.0 International license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
Category:CC-BY-SA-4.0#Abschiebungen.svg
SVG development
InfoField
 The SVG code is valid.
 This chart was created with R.
Category:Valid SVG created with R code#Abschiebungen.svg
  Category:Translation possible - SVGThis file uses embedded text that can be easily translated using a text editor.
Source code
InfoField

R code

svg("Abschiebungen.svg", width = 15, height = 9)

jahr <- seq(1901, 2022)
asyl <- data.frame(jahr)
################################################################################

rownames(asyl) <- jahr
asyl[c(90:122), "abschiebungen"] <- c(10850,13668,19821,47070,53043,36455,31761,38205,38479,32929,35444,27902,29036,26487,23334,17773,13894,9617,8394,7830,7558,7917,7651,10198,10884,20888,25375,23966,23617,22097,10800,11982,12945)
comment(asyl$abschiebungen) <- "Number of persons deported from Germany - - - Sources: 1990-2004 Bundespolizei; 2005-2007 Migrationsbericht 2013; 2008-2015 Migrationsbericht 2015; 2016-2021 Das Bundesamt in Zahlen 2022 - Modul Asyl; 2022 Bundestagsdrucksasche 20/5795"

asyl[c(75, 80, 85, 90:122), "asylberechtigte"] <- c(2928,12783,11224,6518,11597,9189,16396,25578,18100,14389,8443,5883,4114,3128,5716,2379,1534,960,411,251,304,233,452,643,652,740,919,2285,2029,2120,4359,2841,2192,1693,1226,1937)
comment(asyl$asylberechtigte) <- "Sources: 1975, 1980, 1985, 1990-2002 Bundesamt für die Anerkennung ausländischer Flüchtlinge,  Nürnberg; 2003–2006 Statistisches Bundesamt; 2007–2010 Aktuelle Zahlen zu Asyl 2015 (S.9); 2011–2020  Bundesamt für Migration und Flüchtlinge: Broschüre ::Das Bundesamt in Zahlen 2020::,Entscheidungen und Entscheidungsquoten seit 2011 / ab 1994 nur Erstanträge; 2021-2022 Bundesamt für Migration und Flüchtlinge: Broschüre ::Das Bundesamt im Zahlen 2022 - Modul Asyl::, Entscheidungen und Entscheidungsquoten seit 2013 in Jahreszeiträumen (Erst- und Folgeanträge) (S.37)"

########################################
# Asylsuchende
asyl[53:122, "asylsuchende"] <- c(1906,2174,1926,16284,3112,2785,2267,2980,2722,2550,3238,4542,4337,4370,2992,5608,11664,8645,5388,5289,5595,9424,9627,11123,16410,33136,51493,107818,49391,37423,19737,35278,73832,99650,57379,103076,121315,193063, 256112, 438191, 322599, 127210, 127937, 116367, 104353, 98644, 95113, 78564, 88287, 71127, 50563, 35607, 28914, 21029, 19164, 22085, 27649, 41332, 45741, 64539, 109580, 173072,441899,722370,198317,161931,142509,102581,148233,217774)
comment(asyl$asylsuchende) <- "Source: Bundesamt für Migration und Flüchtlinge: Broschüre ::Das Bundesamt in Zahlen 2021 - Modul Asyl::, Entwicklung der Asylantragszahlen seit 1953 (S.9). Bis 1994 Erst- und Folgeanträge. Ab 1995 Erstanträge."
########################################
jahre <- 1990:2022
plot(jahre, asyl$abschiebungen[90:122], ylim = c(0, 185000), bty = "l", yaxs = "i", type = "b", xlab = " ", ylab = " ", pch = 16, lab = c(10, 10, 1), col = "red", sub = "Abschiebungen aus Deutschland", lwd = 2)
lines(jahre, asyl$asylsuchende[90:122], lty = 1, type = "b", pch = 16, lwd = 1, col = "grey")
lines(jahre, asyl$asylberechtigte[90:122], lty = 1, type = "b", pch = 16, col = "lightgreen", lwd = 1)
text(1990:1998, c(asyl$asylberechtigte[90:98] - 400), as.character(asyl$asylberechtigte[90:98]), pos = 1, cex = 0.7, col = "green")
text(1999:2022, c(asyl$asylberechtigte[99:122] + 7000), as.character(asyl$asylberechtigte[99:122]), pos = 1, cex = 0.7, col = "green")
text(1995, 50000, labels = "Abschiebungen", pos = 4, cex = 1, col = "red")
text(1990:2022, c(asyl$abschiebungen[90:122] + 9400), as.character(asyl$abschiebungen[90:122]), pos = 1, cex = 0.7, col = "red")
text(1998, 120000, labels = "Asylantragsteller (Ab 1995 nur Erstantr\u00E4ge)", pos = 4, cex = 1, col = "grey")
text(1990:2022, c(asyl$asylsuchende[90:1020] + 9400), as.character(asyl$asylsuchende[90:122]), pos = 1, cex = 0.7, col = "grey")
text(1998, 15000, labels = "Asylberechtigt nach Art.16/ 16a GG", pos = 4, cex = 1, col = "lightgreen")
text(c(1990,1992), 180000, as.character(asyl$asylsuchende[c(90,92)]), pos = 1, cex = 0.7, col = "grey")
text(c(1991,1993), 175000, as.character(asyl$asylsuchende[c(91,93)]), pos = 1, cex = 0.7, col = "grey")
text(c(2015,2017), 175000, as.character(asyl$asylsuchende[c(115,117)]), pos = 1, cex = 0.7, col = "grey")
text(2016, 180000, as.character(asyl$asylsuchende[116]), pos = 1, cex = 0.7, col = "grey")
text(2022, 180000, as.character(asyl$asylsuchende[122]), pos = 1, cex = 0.7, col = "grey")
dev.off()
Category:Immigration in Germany Category:User:Kopiersperre Diagrams Category:Emigration from Germany Category:Migration statistics
Category:CC-BY-SA-4.0 Category:Emigration from Germany Category:Immigration in Germany Category:Migration statistics Category:Translation possible - SVG Category:User:Kopiersperre Diagrams Category:Valid SVG created with R code