Word cloud Ko NLP extract Noun use Sejong

  • Slides: 21
Download presentation

Word cloud를 위한 패키지 Ko. NLP - extract. Noun (한글 명사 추출 함수) -

Word cloud를 위한 패키지 Ko. NLP - extract. Noun (한글 명사 추출 함수) - use. Sejong. Dic()

Word cloud를 위한 패키지 wordcloud

Word cloud를 위한 패키지 wordcloud

txt <- read. Lines(“jeju. txt”) place <- sapply(txt, extract. Noun, USE. NAMES=F) 1006줄 -

txt <- read. Lines(“jeju. txt”) place <- sapply(txt, extract. Noun, USE. NAMES=F) 1006줄 - 두 곳을 견주어 후회가 없었답니다.

c를 재정의 c<-unlist(place) write(c, ”jeju_2. txt”) rev<-read. table(“jeju_2. txt”) nrow(rev) = 1539 wordcount<-table(rev)

c를 재정의 c<-unlist(place) write(c, ”jeju_2. txt”) rev<-read. table(“jeju_2. txt”) nrow(rev) = 1539 wordcount<-table(rev)

wordcount head(sort(wordcount, decreasing=T, 30)

wordcount head(sort(wordcount, decreasing=T, 30)

library(RColor. Brewer) palete<-brewer. pal(9, “Set 1”) wordcloud(names(wordcount), freq=wordcount, scale=c(5, 1), rot. per =0. 25,

library(RColor. Brewer) palete<-brewer. pal(9, “Set 1”) wordcloud(names(wordcount), freq=wordcount, scale=c(5, 1), rot. per =0. 25, min. freq=5, random. order=F, random. color=T, colors=palete)

빈도 수로 20개 추출 wordcloud(names(wordcount), freq=wordcount, scale =c(5, 1), rot. per=0. 25, min. freq=4,

빈도 수로 20개 추출 wordcloud(names(wordcount), freq=wordcount, scale =c(5, 1), rot. per=0. 25, min. freq=4, , random. color=T, colors=palete)