R语言做词云图的时候生成的全是乱码，请问该如何处理？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如题，使用的Rstudio调用R3.4.2 32bit, win10 64bit代码如下：

1. setwd("C:/Users/2015/Desktop/test")
   
2. library(tm);
   
3. library(tmcn);
   
4. yuliaoku<-Corpus(DirSource("C:/Users/2015/Desktop/test",pattern = "*.txt"),readerControl = list(language="UTF-8")) #
   
5. yuliaoku<-tm_map(yuliaoku,stripWhitespace)
   
6. library(rJava);
   
7. library(Rwordseg);
   
8. yuliaoku<-tm_map(yuliaoku,content_transformer(segmentCN),returnType="tm")
   
9. control<-list(wordLengths=c(1,5),stopwords=stopwordsCN())
   
10. mt<-TermDocumentMatrix(yuliaoku,control = control)
    
11. vmt<-as.matrix(mt)
    
12. val<-sort(rowSums(vmt),decreasing = TRUE)
    
13. df<-data.frame(word=names(val),freq=val)
    
14. library(wordcloud)
    
15. wordcloud(df$word,df$freq,min.freq = 3,random.order = FALSE,colors = rainbow(length(row.names(vmt))))

复制代码

结果显示词云图中文乱码

附件为测试文本

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 词云图 Library RStudio Desktop