stopwords 궁금...

미해결질문
dgdg dgdg 프로필

혹시 lda로 나온 결과 값인데. stopwords가 안되는 이유가 있을까요

stopwords가 제대로 나오기 위한 패키지같은게 따로 있을까요

=============  lda로 나온 결과 값

$`4`

뉴스 무단전재     밝히     위하 이데일리   이벤트   재배포     진행     창업     통하 

       1        1        1        1        1        1        1        1        1        1 

============= DocumentTermMatrix에서 stopwords=stw

dtm <- DocumentTermMatrix(corpus, control=list(

  removePunctuation=TRUE,stopwords=stw,

  removeNumbers=TRUE,weighting=weightTf))

 dtm<-dtm[apply(dtm,1,sum) != 0,]

============

stw<-c("으로","하는","에서","입니다","합니다","있습니다",

       "하고","에게","있는","라고","에도","이고","하게","또한","하기","매일경제",

       "모르","재배포","되는","되지","이라고","이고","라는","됩니다","않습니다",

코코 프로필
코코 1달 전

안녕하세요. dgdg dgdg님.

답변이 너무 늦었네요. 죄송합니다. 

윈도우 환경이나 다루고 있는 텍스트의 인코딩에 따라 한글이 깨지거나 텍스트 적용 함수가 잘 먹히지 않을 수 있습니다.

사실 정확히 알기 위해서는 함수를 까보는 방법이 있지만, 함수자체도 까보기 어려운 경우가 있습니다.

대체하는 방법으로는,   corpus  로 만들기 전에 워본데이터에서 stopword 를 제거하는 방법이 있을것 같습니다.

 gsub 함수나,  str_replace  함수등을 이용 할 수 있을 것 같습니다. 

지식공유자 되기
많은 사람들에게 배움의 기회를 주고,
경제적 보상을 받아보세요.
지식공유참여
기업 교육을 위한 인프런
“인프런 비즈니스” 를 통해 모든 팀원이 인프런의 강의들을
자유롭게 학습하는 환경을 제공하세요.
인프런 비즈니스