使用工具:

  • Photoshop(仅用于抠图)
  • R/Rstudio
  • Excel 材料:
  • 一张个人照片(剪影)

总体思路:使用wordcloud2包制作词云,以个人照片为词云轮廓。

过程:

1.制作一张轮廓背景图 将一张个人照片导入Photoshop中,抠出人物边界,删掉人物之外的元素(注意是删掉,不是填充成白色),然后保存成example.png(不要保存成其他格式,否则空白区域会被自动填充上)。如下:

2. 制作词云数据 在Excel中,填入两列数据,第一列是关键词,第二列是0-100任意数字。如下(部分表)example.txt: 其中,数字越大,最后在词云中表现出的字体越大。这些关键词随你所欲,想写什么就写什么,但是后面的数字要注意,不要太多很大的数字,否则词云中无法体现出来。大的数字少,小的数字越来越多,大概填写100行左右。但是如果想做一张很好的图,这些还是不够,还需要几百行,不过剩下的这几百行,你就随便粘贴复制吧,把字体大小设置在<10,也就是说,这几百行在词云中你是基本看不清写的什么,只是用来填充背景的。 3. 在R软件中绘制词云。 安装wordcloud2包,注意不要使用install.packages()安装(这种安装方法有bug, 不能添加图片剪影),使用devtools在安装:

require(devtools)
install_github("lchiffon/wordcloud2")
		然后,导入数据,绘制(注意文件路径):
library(wordcloud2)
aa <- read.table('example.txt',sep = "\t", header = F)
##设置颜色“skyblue"
wordcloud2(aa, figPath = "example.png",size = 0.5,color ="skyblue")
##使用默认颜色设置
wordcloud2(aa, figPath = "example.png",size = 0.5)

完成,你可以设置不同的参数,包括颜色,大小。具体设置可以参考: https://cran.r-project.org/web/packages/wordcloud2/vignettes/wordcloud.html

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