楼主: bystander1022
9896 0

[程序分享] 【R教程】绘制词云图 [推广有奖]

  • 4关注
  • 12粉丝

已卖:4956份资源

教授

70%

还不是VIP/贵宾

-

威望
0
论坛币
8486 个
通用积分
18.7679
学术水平
42 点
热心指数
52 点
信用等级
31 点
经验
1389 点
帖子
230
精华
0
在线时间
2663 小时
注册时间
2010-3-29
最后登录
2025-12-15

楼主
bystander1022 发表于 2015-6-4 16:14:53 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币

“词云”概念由美国西北大学新闻学副教授、新媒体专业主任里奇·戈登(Rich Gordon)提出。其是对网络文本中出现频率较高的“关键词”予以视觉上的突出,形成“关键词云层”或“关键词渲染”,从而过滤掉大量的文本信息,使阅读者只要一眼扫过就可以领略文本的主旨。本文简单介绍在R中如何绘制该图。

1命令如下

1)设定工作环境

setwd("F:/Dropbox/R/map")

2)导入程序包

library(wordcloud)

library(tm)

3)读取及整理数据

crude<- tm_map(crude,removePunctuation)

crude<-tm_map(crude,function(x)removeWords(x,stopwords()))

tdm<-TermDocumentMatrix(crude)

m<-as.matrix(tdm)

v<-sort(rowSums(m),decreasing = TRUE)

d<- data.frame(word=names(v),freq=v)

4)绘制图示

wordcloud(d$word,d$freq,random.order=FALSE,colors=brewer.pal(8,"Dark2"))





二维码

扫码加我 拉你入群

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

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

关键词:r教程 词云图 Library Dropbox 美国西北大学 新媒体专业 function 西北大学 library 工作环境

最重要的,拥有跟随内心与直觉的勇气。。

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-30 09:32