Ficheru:Population of Germany.svg
Tamañu de la vista previa PNG d'esti ficheru SVG: 800 × 480 pixels. Otres resoluciones: 320 × 192 pixels | 1024 × 614 pixels | 1280 × 768 pixels | 2560 × 1536 pixels | 1350 × 810 pixels.
Ficheru orixinal (ficheru SVG, 1350 × 810 píxels nominales, tamañu de ficheru: 72 kB)
|
Se espera que esta imagen sea siempre la más reciente. Siéntase libre de actualizarla cuando sea necesario.
|
|
This file may be updated to reflect new information. If you wish to use a specific version of the file without new updates being mirrored, please upload the required version as a separate file. |
Resume
| Descripción |
Deutsch: Gesamtdeutsche Bevölkerung von 1950 bis 2021
English: Population of Germany from 1950 to 2021 |
| Data | |
| Fonte |
Trabayu propiu, data from Sonderreihe mit Beiträgen für das Gebiet der ehemaligen DDR Heft 3 Bevölkerungsstatistische Übersichten 1946 bis 1989 (S.24) Statistisches Bundesamt |
| Autor | Hi, future humans! (alderique · contribuciones), R code inspired by Europol de Wikipedia en alemán, |
| Permisu (Cómo reutilizar esti ficheru) |
   Este archivo está disponible bajo la licencia Creative Commons Attribution-Share Alike 4.0 International.
|
| Otres versiones | auf Deutsch |
| SVG desarrollo |  El código fuente de esta imagen SVG es válido.  Este gráfico vectorial fue creado con R  This file uses embedded text that can be easily translated using a text editor. |
| Códigu fonte | R codesvg("Population of Germany.svg", width = 15, height = 9)
year <- seq(1901, 2021)
population <- data.frame(year)
################################################################################
rownames(population) <- year
population[c(50:121), "humans"] <- c(
(18.388 + 50.958125), # 1950
(18.351 + 51.434777),
(18.328 + 51.863761),
(18.178 + 52.453806),
(18.059 + 52.943295),
(17.944 + 53.517683),
(17.718 + 53.339626),
(17.517 + 54.064365),
(17.355 + 54.719159),
(17.298 + 55.257088),
(17.241 + 55.958321), # 1960
(17.125 + 56.589148),
(17.102 + 57.247246),
(17.155 + 57.864509),
(16.983 + 58.587451),
(17.020 + 59.296591),
(17.058 + 59.792934),
(17.082 + 59.948474),
(17.084 + 60.463033),
(17.076 + 61.194591),
(17.058 + 61.001164), # 1970
(17.061 + 61.502503),
(17.043 + 61.809378),
(16.980 + 62.101369),
(16.925 + 61.991475),
(16.850 + 61.644624),
(16.786 + 61.441996),
(16.765 + 61.352745),
(16.756 + 61.321663),
(16.745 + 61.439342),
(16.737 + 61.657945), # 1980
(16.736 + 61.712689),
(16.697 + 61.546101),
(16.699 + 61.306669),
(16.671 + 61.049256),
(16.644 + 61.020474),
(16.624 + 61.140461),
(16.641 + 61.238079),
(16.666 + 61.715103),
(16.614 + 62.679035),
79.753227, # 1990
80.274564,
80.974632,
81.338093,
81.538603,
81.817499,
82.012162,
82.057379,
82.037011,
82.163475,
82.259540, # 2000
82.440309,
82.536680,
82.531671,
82.500849,
82.437995,
82.314906,
82.217837,
82.002356,
81.802257,
81.751602, # 2010
80.327900,
80.523746,
80.767463,
81.197537,
82.175684,
82.521653,
82.792351,
83.019213,
83.166711,
83.155031, # 2020
83.237124
)
comment(population$humans) <- "Sources:
East German population: -Special series with contributions for the territory of the former GDR- Booklet 3, Population Statistical Surveys 1946 to 1989, released May 1993 https://www.statistischebibliothek.de/mir/receive/DEMonografie_mods_00002289 (page 24);
West German population since 1950 and combined populations since 1990: Federal Statistical Office Germany Table 12411-0001"
########################################
years <- 1950:2021
par(mar = c(2.7, 4.5, 2.5, 0)) #bottom, left, top, right
plot(
years,
population$humans[50:121],
ylim = c(65, 85),
bty = "l",
type = "b",
yaxs = "i",
xlab = "",
ylab = "",
pch = 15,
lab = c(10, 10, 1),
col = "red",
main = "Population of Germany",
cex.main = 2,
sub = "",
lwd = 2,
yaxt = "n",
xaxt = "n"
)
axis(
1,
at = seq(1950, 2021, by = 5),
las = 0,
tck = 1,
lty = 1,
col = "#c9c9c9",
lwd = 1
)
axis(
2,
at = seq(65, 85, by = 1),
las = 2,
tck = 1,
lty = 1,
col = "#c9c9c9",
lwd = 1
)
mtext( # Y Axis
side = 2,
text = "million",
cex = 1.3,
line = 2.5
)
dev.off()
|
Historial del ficheru
Calca nuna fecha/hora pa ver el ficheru como taba daquella.
| Data/Hora | Miniatura | Dimensiones | Usuariu | Comentariu | |
|---|---|---|---|---|---|
| actual | 19:00 23 och 2022 | | 1350 × 810 (72 kB) | Hi, future humans! | 2021 |
| 00:10 2 avi 2021 |  | 1350 × 810 (60 kB) | Hi, future humans! | {{Information |Description={{de|1=Gesamtdeutsche Bevölkerung von 1960 bis 2020}} {{en|Population of Germany from 1960 to 2020}} |Source={{Own}}, data from [https://www.statistischebibliothek.de/mir/servlets/MCRFileNodeServlet/DEMonografie_derivate_00000961/Heft_3.pdf Sonderreihe mit Beiträgen für das Gebiet der ehemaligen DDR Heft 3 Bevölkerungsstatistische Übersichten 1946 bis 1989 (S.24)] [https://www.destatis.de/DE/Themen/Gesellschaft-Umwelt/Bevoelkerung/Bevoelkerungsstand/_inhalt.html Sta... |
Usu del ficheru
La páxina siguiente usa esti ficheru:
Usu global del ficheru
Estes otres wikis usen esti ficheru:
- Usu en an.wikipedia.org
- Usu en br.wikipedia.org
- Usu en ca.wikipedia.org
- Usu en cy.wikipedia.org
- Usu en fi.wikipedia.org
- Usu en gl.wikipedia.org
- Usu en he.wikipedia.org
- Usu en it.wikipedia.org
- Usu en ko.wikipedia.org
- Usu en lt.wikipedia.org
- Usu en pt.wikipedia.org
- Usu en uk.wikipedia.org
