用R软件制作具有科技感的头像“文字云”

关注天善智能↑，走好数据之路

对商业智能BI、大数据分析挖掘、机器学习，python，R等数据领域感兴趣的同学加微信：tstoutiao，邀请你进入头条数据爱好者交流群，数据爱好者们都在这儿。

前段时间时不时在哪里可以看到各种“文字云”的图片，看起来很高大上，而且还有人将背景设计成自己的登记照，然后就可以得出背景为自己登记照的文字云。看得很羡慕，想到R软件这么强大，应该也可以做的吧

于是，上 查了下，还真有。

R中的“wordcloud2包”，可以实现“文字云”的制作。接下来分享一下我一个下午时间的学习过程和成果。

同样先下载并加载包：

install.packages(“wordcloud2”)

R的学习有一个特点，那就是：学习R的过程其实就是了解并学习不同的新的功能包的过程，而新包的学习可以通过R中自带的帮助系统实现。

那么，我们先看看帮助系统：

?wordcloud2

帮助系统文件中，最重要的大概就是用法（Usage）部分和参数(Arguments)部分了

wordcloud2(

data, #待处理的数据

size = 1, #字体大小（默认值为1）

gridSize = 0, #各文字之间的间距

fontFamily = ‘Segoe UI’, #字体

fontWeight = ‘bold’, #字体粗细

color = ‘random-dark’, #字体颜色

backgroundColor = “white”, #文字云的背景颜色

minRotation = -pi/4, maxRotation = pi/4, #最小和最大旋转度

shuffle = TRUE, #更新后重置

rotateRatio = 0.4, #旋转概率

shape = ‘circle’, #文字云的形状

ellipticity = 0.65, #椭圆率；椭圆程度

widgetsize = NULL, #小部件尺寸

hoverFunction = NULL #重叠时自动避开)

这个包中自带一个演示数据集，demoFreq数据集，接下来的演示就用这组数据。

文字云的特点是将每一个文字对象，放在一个视图中，每个文字对象的大小都是根据其出现的频率来实现的，出现频率越高，相应的文字对象在图中越大。

先用最简单的代码将上述数据集的文字云可视化出来：

wordcloud2(data = demoFreq)

效果如下：

看来还不错，有种高大上的感觉

感兴趣的同学还可以自己尝试改变其他的参数来更改颜色，背景色，字体，图像形状等等，这里不过多介绍了。好戏还在后头呢 ——>

我们需要先将自己设置的图像放在这个包的下面的这个目录中：

放好后，用system.file()函数调用图像，

DJZ_jpg <-system.file(“examples/DJZ.jpg”,package = “wordcloud2”)

wordcloud2(demoFreq, figPath = DJZ_jpg, size = 1,color = “random-light”)

是这个效果：

到这一步，其实已经感觉很爽了，但是，担心别人看不出来这是我啊，这也太马赛克了吧，而且以前见过别人的图，那都是很高清，很有科技感的好吗。

于是，我决定继续学习 》》》

然而， 上并没有见到R可以实现更好看的效果。但是却发现了一些可以在线制作的 站，简单又方便， 址：https://wordart.com/

按照图中的来就行了，操作很简洁

在Shapes中有个“添加图片”的选项，这里就可以添加你自己的登记照了

当然，上面还有很多其他的图形可供选择，也可以调整其他的字体，颜色等，感兴趣的自己可以多尝试一下。

我的登记照放进去后，效果是这样的：

自我感觉好多了。哈哈。今天的分享就到这里 》》》

没以前丑了。。。

参考资料：

1. http://mp.weixin.qq.com/s/pbHhPcSU8EYDDp0chqgtew；

2. 
   https://zhuanlan.zhihu.com/p/25098217。

-THE END-

对商业智能BI、大数据分析挖掘、机器学习，python，R等数据领域感兴趣同学加微信：tstoutiao，邀请您加入头条数据爱好者交流群，数据爱好者们都在这儿。