Fichero orichinal(fichero SVG, nominalment 1350 × 810 píxels, grandaria: 72 kB)

Iste fichero ye de Wikimedia Commons y pueden emplegar-lo atros prochectos. Debaixo s'amuestra a descripción d'a suya pachina de descripción.

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.

Resumen

Descripción
Deutsch: Gesamtdeutsche Bevölkerung von 1950 bis 2021
English: Population of Germany from 1950 to 2021
Calendata
Fuent

Treballo de qui la cargó, 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! (descutir · contrebucions), R code inspired by Europol de Biquipedia en alemán,
Permiso
(Reutilización d'iste fichero)
w:an:Creative Commons
atribución d'autoría compartir igual
Este archivo está disponible bajo la licencia Creative Commons Attribution-Share Alike 4.0 International.
Ye libre:
  • de compartir – de copiar, distribuir y transmitir o treballo
  • de remezclar – d'adaptar o treballo
Baixo as siguients condicions:
  • atribución d'autoría – Ha d'atribuir l'autoría d'o treballo d'a traza especificada por l'autor u persona que l'haiga licenciau (pero no pas de traza que suchiera que l'autor/os autors refirma(n) u refirma(n) l'uso que faigas d'o treballo).
  • compartir igual – En caso d'alterar, transformar u enamplar iste treballo, habrá de distribuir o treballo resultant solament baixo a mesma licencia u beluna equivalent.
Atras versions auf Deutsch
SVG desarrollo
InfoField
 
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ódigo fuente
InfoField

R code

svg("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()

Leyendas

Añade una explicación corta acerca de lo que representa este archivo
Population of Germany from 1950 to 2020

Elementos representados en este archivo

representa a espanyol

licencia espanyol

CC BY-SA 4.0 espanyol

tipo de archivo espanyol

image/svg+xml

Historial d'o fichero

Punche en una calendata/hora ta veyer o fichero como amaneixeba por ixas envueltas.

Calendata/HoraMiniaturaDimensionsUsuarioComentario
actual19:00 23 oct 2022Miniatura d'a versión de 19:00 23 oct 20221350 × 810 (72 kB)Hi, future humans!2021
00:10 2 avi 2021Miniatura d'a versión de 00:10 2 avi 20211350 × 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...

A pachina siguient emplega iste fichero:

Uso de fichers globals

Os siguients wikis fan servir iste fichero:

Metadatos