R
-
문재인 대통령 평양 연설문에 대한 Word Cloud 작성하기R/TextMining 2019. 10. 24. 21:52
# 패키지 설치하기와 로딩하기 # Java 최신 버전 설치하기 install.packages("tidyverse") install.packages("tidytext") install.packages("KoNLP") install.packages("reshape2") install.packages("wordcloud2") library(tidyverse) library(tidytext) library(KoNLP) library(reshape2) library(wordcloud2) # 작업공간 설정하기 setwd("e:/R/TextMining/") # KoNLP 패키지에서 제공하는 NIA 사전 사용하기 KoNLP::useNIADic() # Word Cloud 작성하기 readLines(con = "moon...
-
Jane Austen 소설 속 Term FrequencyR/TextMining 2019. 10. 21. 17:59
install.packages("tidytext") install.packages("tidyverse") install.packages("janeaustenr") library(tidytext) library(tidyverse) library(janeaustenr) # 단어의 빈도를 구함 janeaustenr::austen_books() %>% tidytext::unnest_tokens(output = word, input = text) %>% dplyr::count(book, word, sort = TRUE) %>% dplyr::ungroup() -> book_words # 소설별로 단어 빈도의 합계를 구함 book_words %>% dplyr::group_by(book) %>% dplyr::summa..
-
word cloud : 부정적인 단어와 긍정적인 단어 표현하기R/TextMining 2019. 10. 21. 10:06
부정적인 단어는 gray, 긍정적인 단어는 green으로 표현하기 tidy_books %>% dplyr::inner_join(tidytext::get_sentiments("bing")) %>% dplyr::count(word, sentiment, sort = TRUE) %>% reshape2::acast(word ~ sentiment, value.var = "n", fill = 0) %>% wordcloud::comparison.cloud(colors = c("grey20", "green"), max.words = 100) [ 출처] R로 배우는 텍스트마이닝, 줄리아 실기/데이비드 로빈슨 지음, 박진수 옮김, Jpub, p31
-
일별/월별 변환 그래프R/TimeSeries 2019. 10. 3. 11:35
install.packages("quantmod") library(quantmod) # 데이터 가져오기 quantmod::getSymbols("IBM", src = "yahoo", from = as.Date("2015-08-01"), to = as.Date("2016-08-31")) # 그래프 작성하기 # 일별 quantmod::chartSeries(periodReturn(IBM, period = "daily"), theme = "white") # 월별 quantmod::chartSeries(periodReturn(IBM, period = "monthly"), theme = "white") [출처] R과 SAS를 이용한 시계열 분석, 박영진 지음, 한나래, p83