楼主: 小龙虾66
854 1

[问答] R词条云,求大神助我得道! [推广有奖]

  • 0关注
  • 0粉丝

小学生

28%

还不是VIP/贵宾

-

威望
0
论坛币
0 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
40 点
帖子
1
精华
0
在线时间
10 小时
注册时间
2018-1-30
最后登录
2019-8-12

楼主
小龙虾66 发表于 2019-1-18 17:33:57 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
# install.packages('RColorBrewer')
# install.packages('wordcloud')

library(RColorBrewer)
library(wordcloud)

# set workdir
# getwd()
setwd("D:/abctest")
# read the data from disk
data = read.csv("D:/abctest/yun.txt",sep=':')
# read the columns of dataframe
names(data)
levels(data$word)
levels(data$word)[18] <- 'comaple'
data <- rbind(data,c('comaple',0.015))
# set colors
colors=c('red','blue','green','maroon','brown','navy','purple','black')
# generate the word cloud
wordcloud(data$word,data$freq,scale=c(6,1),min.freq=0,max.words=100,colors=colors,random.order=F,random.color=T,ordered.colors=F,family='STKaiti')



错误代码Error in -freq : invalid argument to unary operator


二维码

扫码加我 拉你入群

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

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


沙发
nice生活圈 在职认证  学生认证  发表于 2019-1-21 16:24:39
您好,如果您的求助没有解决,请到项目交易发布需求,会有更快更专业的用户帮助您 https://bbs.pinggu.org/prj/

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

本版微信群
加好友,备注jltj
拉您入交流群
GMT+8, 2026-2-7 18:06