파일:Population of Germany.svg

문서 내용이 다른 언어로는 지원되지 않습니다.
위키백과, 우리 모두의 백과사전.

원본 파일 ‎(SVG 파일, 실제 크기 1,350 × 810 픽셀, 파일 크기: 72 KB)

이 이미지는 항상 최신의 것이 요구됩니다. 필요에 따라서 자유롭게 갱신해주세요.
이 파일은 최신 정보를 받아서 업데이트될 가능성이 있습니다.
새로운 업데이트가 반영되는 것 없이, 특정 판의 파일을 사용한 경우에는, 필요한 판을 다른 파일로서 업로드해주세요.

파일 설명

설명
Deutsch: Gesamtdeutsche Bevölkerung von 1950 bis 2021
English: Population of Germany from 1950 to 2021
날짜
출처

자작, 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
저자 Hi, future humans! (토론 · 기여), R code inspired by 독일어 위키백과의 Europol,
저작권
(이 파일을 인용하기)
w:ko:크리에이티브 커먼즈
저작자표시 동일조건변경허락
이 파일은 크리에이티브 커먼즈 저작자표시-동일조건변경허락 4.0 국제 라이선스로 배포됩니다.
이용자는 다음의 권리를 갖습니다:
  • 공유 및 이용 – 저작물의 복제, 배포, 전시, 공연 및 공중송신
  • 재창작 – 저작물의 개작, 수정, 2차적저작물 창작
다음과 같은 조건을 따라야 합니다:
  • 저작자표시 – 적절한 저작자 표시를 제공하고, 라이센스에 대한 링크를 제공하고, 변경사항이 있는지를 표시해야 합니다. 당신은 합리적인 방식으로 표시할 수 있지만, 어떤 방식으로든 사용권 허가자가 당신 또는 당신의 사용을 지지하는 방식으로 표시할 수 없습니다.
  • 동일조건변경허락 – 만약 당신이 이 저작물을 리믹스 또는 변형하거나 이 저작물을 기반으로 제작하는 경우, 당신은 당신의 기여물을 원저작물과 동일하거나 호환 가능한 라이선스에 따라 배포하여야 합니다.
다른 버전 auf Deutsch
SVG 발전
InfoField
 
이 SVG 파일의 소스 코드 문법이 올바릅니다.
 
이 chart R(으)로 제작되었습니다.
 
 이 SVG 파일은 내장된 문자열을 사용하고 있으며 문서 편집기를 사용해서 쉽게 번역할 수 있습니다.
소스 코드
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()

설명

이 파일이 나타내는 바에 대한 한 줄 설명을 추가합니다
Population of Germany from 1950 to 2020

이 파일에 묘사된 항목

다음을 묘사함

미디어 유형

image/svg+xml

파일 역사

날짜/시간 링크를 클릭하면 해당 시간의 파일을 볼 수 있습니다.

날짜/시간섬네일크기사용자설명
현재2022년 10월 24일 (월) 04:002022년 10월 24일 (월) 04:00 판의 섬네일1,350 × 810 (72 KB)Hi, future humans!2021
2021년 12월 2일 (목) 09:102021년 12월 2일 (목) 09:10 판의 섬네일1,350 × 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...

다음 문서 1개가 이 파일을 사용하고 있습니다:

이 파일을 사용하고 있는 모든 위키의 문서 목록

다음 위키에서 이 파일을 사용하고 있습니다:

메타데이터

이 파일에는 카메라나 스캐너가 파일을 만들거나 디지털화하는 데 사용하기 위해 기록한 부가 정보가 포함되어 있습니다.

프로그램에서 파일을 편집한 경우, 새로 저장한 파일에 일부 부가 정보가 빠질 수 있습니다.

원본 주소 "https://ko.wikipedia.org/wiki/파일:Population_of_Germany.svg"