데이터시각화 - 다음의 조선왕조 왕들의 수명과 재위기간 자료로 rainbow 칼라를 이용하여 재위 기간을 기간에 비례하는 높이의 막대를 비껴 그린 그래프를 작성하라.

목차

1. 다음의 조선왕조 왕들의 수명과 재위기간 자료로 rainbow 칼라를 이용하여 재위기간을 기간에 비례하는 높이의 막대를 비껴 그린 그래프를 작성하라.(5점)

2. 다음 투자지역별 투자원금과 수익률 자료로 나무그림과 상층 나무그림을 작성하여 비교하라.(5점)
(1) 나무그림
(2) 상층 나무그림

3. 통계청 e나라지표에서 자료를 찾아 우리나라 연도별 연령별 총인구 자료로 누적그래프를 작성하라.(5점)
(*) 통계청 e나라지표에서 제공하는 자료는 교재와 동일하게 자세한 연령대 정보를 제공하지 않아 0~14세, 15~64세, 65세 이상의 구분으로 그래프 작성함
(1) 연령대별 인구 그래프
(2) 연령대별 인구비중 그래프

4. 애국가의 워드 클라우드를 작성하라.(5점)

5. R dataset의 Volcano자료로 이미지 그래프와 컬러등고선도를 작성하라.(5점)

6. 우리나라 시도별 인구자료로 전체와 연도별 인구분포 지도를 작성하라.(5점)
(*) gadm 파일에 세종시 추가됨(code:15), 세종시 인구 2010~1980 모두 1로 데이터 넣어 진행함

본문내용

4. 애국가의 워드 클라우드를 작성하라.(5점)
애국가 :
동해물과 백두산이 마르고 닳도록 하느님이 보우하사 우리나라 만세
무궁화 삼천리 화려강산 대한 사람, 대한으로 길이 보전하세
남산 위에 저 소나무, 철갑을 두른 듯 바람서리 불변함은 우리 기상일세
무궁화 삼천리 화려강산 대한 사람, 대한으로 길이 보전하세
가을 하늘 공활한데 높고 구름 없이 밝은 달은 우리 가슴 일편단심일세
무궁화 삼천리 화려강산 대한 사람, 대한으로 길이 보전하세
이 기상과 이 맘으로 충성을 다하여 괴로우나 즐거우나 나라 사랑하세
무궁화 삼천리 화려강산 대한 사람, 대한으로 길이 보전하세

library(tm)
library(wordcloud)
library(KoNLP)
library(RColorBrewer)
ktext<-Corpus(DirSource("D:/data/HW/ktext", encoding="UTF-8", recursive=TRUE))
words<-unlist(sapply(ktext[[1]]$content, extractNoun, USE.NAMES=FALSE))

참고자료

· 없음