- [R을 이용한 나라별 기대수명, 출산율, 소득수준 상관관계 분석]2023년 10월 02일 13시 33분 24초에 업로드 된 글입니다.작성자: r-code-for-data-analysis
데이터
1. gamminder : 나라별, 연도별, 기대수명, 인구수, gdp
2. 출산율 : OECD Fertility rates
https://data.oecd.org/pop/fertility-rates.htm
3. 패키지 : tidyverse, stringr, countrycode (나라별 코드), gganimate
4. 분석 시작
#패키지 library(tidyverse) library(stringr) library(gganimate) library(countrycode) library(gapminder) #데이터로드 gapminder <- gapminder %>% mutate(iso3c = countrycode(country, origin = 'country.name', destination = 'iso3c')) df <-read.csv("./data/나라별_국가별_출산율.csv") df %>% filter(LOCATION !="EU" | LOCATION !="OAVG") %>% mutate (name = countrycode(LOCATION, origin = 'iso3c', destination = 'country.name')) %>% select(name, TIME,Value) %>% mutate(Value = round(Value,2))-> df1
5. 1인당 gdp가 올라가면 출산율은 떨어지는가?
몇몇 튀는 데이터를 제외하고는 과거에서 현재로 오면서 gdp도 증가하고, 출산율은 떨어진다.
대륙별로 보면 좀 더 명확하다.
6. 그렇다면 기대수명이 증가할 수록 출산율은 감소할까?
7. 연도별 출생율이 낮은 나라의 top 10 순위를 보자. (1960년대부터 2021년)
라트비아, 헝가리, 핀란드를 거쳐 대한민국이 2005년 이후 1위를 계속 차지함
8. 연도별 출생율이 높은 나라의 top 10 순위를 보자. (1960년대부터 2021년)
사우디아라비아의 출산율이 단연 최고로 높음.
이유식이나 기저귀, 출산용품은 사우디에서 팔아야 할 것 같다.
728x90반응형'데이터 시각화' 카테고리의 다른 글
[R을 이용한 대한민국 남자, 여자 아이 이름 TOP 10 시각화] (0) 2023.10.02 [R을 이용한 기대수명, 출산율, 소득수준 상관관계 분석] (0) 2023.10.02 [R을 이용한 gradient 막대그래프] (0) 2023.07.09 R을 이용한 서울시 도서관 위치 시각화 (0) 2023.06.25 R을 이용한 대한민국 동물 병원 지도 시각화 (0) 2023.06.24 댓글