R语言个性化词云制作
终于成功了,MD我都想用Python做了。wordcloud2要来来回回好几次才能成功做出图,安了卸,卸了安。
话不多说,上代码。
##加载包
library(devtools)
library(usethis)
##从github安装包,我来来回回remove.packages("wordcloud2")下载好几次才成功,大家可以多试验几次。如果直接从github上下载,离线安装也存在,也存在做不了的问题,也得来回好几次,而且github下载的离线包的安装要用到Rtools。
devtools::install_github("lchiffon/wordcloud2")
##加载wordcloud2包
library(wordcloud2)
##普通的咱们就不详细展示了,主要展示下letterCloud和自定义图像作图
wordcloud2(demoFreq)
#用R字作图
letterCloud(demoFreq,"R")
#用CHNINA作图
letterCloud(demoFreq,"CHINA")
##用天坛、大葱做图
letterCloud(demoFreq,"天坛",size=1,color = "random-black")
letterCloud(demoFreq,"大葱",size=1,color = "random-light")
##用个性化图作图,C:/Users/dacong/Desktop/wordcloud/天坛.png,大家自行调换自己图像的位置
wordcloud2(demoFreq,figPath='C:/Users/dacong/Desktop/wordcloud/天坛.png', size=1,color = "random-light")
wordcloud2(demoFreq,figPath='C:/Users/dacong/Desktop/wordcloud/二哈.jpg', size=1,color = "random-black")
wordcloud2(demoFreq,figPath='C:/Users/dacong/Desktop/wordcloud/二哈1.png', size=1,color = "random-light")
以下是做出来的图。
哦,对了,个性化制作图片的时候要把图像调成黑白的那种,因为词云只填充黑色的区域,以二哈为例(其实不调也行,都差不多)。
用PS:先图像-模式-灰度
图像-模式-位图
选择50%阈值,或者自己调吧
得到如下图,还不是很好,如果真要做,可能得仔细PS一下,这里就不弄了。
咱们做下词云,哈哈如下图。
大家可以尝试用自己或者导师的文章和照片,给自己和老师做个个性化的词云;或者给科室弄个个性化的词云,估计都会好看。
最后老规矩上代码,后台回复wordcloud2即可获取。
往期推荐