Wenn es darum geht, Verteilungen in zwei Gruppen übersichtlich dar- und gegenüberzustellen, erweisen sogenannte Bevölkerungs- bzw. Alterspyramiden oftmals gute Dienste. Dem Namen entsprechend werden hier meist Männer und Frauen einer bestimmten Wohnbevölkerung einander gegenübergestellt und gerade bei Diskussionen ums Pensionssystem wird erschrocken festgestellt, dass die Pyramide sich hierzulande inzwischen eher in eine Zwiebel gewandelt hat.

Unabhängig von der Form handelt es sich, rein technisch gesprochen, bei Alterspyramiden im Grunde nur um zwei Balkendiagramme, die (gespiegelt) in einer einzigen Abbildung vereint wurden.

Um diesen Effekt zu erreichen, gibt es viele Wege. Leider erfordern in [R] eigentlich alle davon eine Vielzahl von Schritten. Nachdem es sich bei der Bevölkerungspyramide aber um eine Abbildung handelt, die mitunter doch dann und wann zu gebrauchen ist, habe ich versucht eine Schnittstelle zu basteln, die so ein Plot ohne große Schreibarbeit umsetzt und trotzdem einen möglichst großen Gestaltungsspielraum lässt.

Das Ergebnis war eine Wrapper-Funktion für ggplot2, die in ihrer einfachsten Form lediglich eine tabellarische Auflistung benötigt und daraus dann die Alterspyramide zaubert. Wem die angedachten Parameter als Gestaltungsmöglichkeit nicht ausreichen, die*der kann sich das ganze ggplot2-Objekt ausgeben lassen und nachträglich selbst den optischen Feinschliff übernehmen.

Als minimalen Input benötigt die Funktion eine Tabelle, die vier Informationen bereithalten muss. Das Alter, das Geschlecht, die Anzahl an Personen innerhalb dieser Gruppe und eventuell ein Label für Altersgruppen. Dieses Label wird dann als y-Achse zwischen den beiden Gruppen angezeigt.

ALTER GESCHL N ALTER_GRP5
0 männlich 43139 0
0 weiblich 41038 0
1 männlich 45731
1 weiblich 42850
2 männlich 45913
2 weiblich 43488
3 männlich 44791
3 weiblich 41973
4 männlich 44498
4 weiblich 41712
5 männlich 43369 5
5 weiblich 40823 5
6 männlich 43720
6 weiblich 40928
Copy to Clipboard
Bevölkerungspyramide: Bevölkerung Österreichs nach Geschlecht zum 1.1.2019