用“emoji”秀出你的风采

有问题，不要怕！点击推文底部“ 阅读原文 ”下载爬虫俱乐部用户问题登记表并按要求填写后发送至邮箱 [email protected] ，我们会及时为您解答哟

下班休息看推文，放学回家学技术，千篇一律怎么破？我来帮你秀风采！

还在为日复一日的重复而焦躁吗？还在为秀不出自己的风采而烦恼吗？小编这就给客官上菜—— 用emoji来绘图 ，点出精彩人生！

emoji （絵文字，词义来自日语えもじ，e-moji，moji在日语中的含义是字符）是一套起源于日本的12x12像素表情符号，由栗田穣崇(Shigetaka Kurit)创作，最早在日本网络及手机用户中流行，自苹果公司发布的iOS 5输入法中加入了emoji后，这种表情符号开始席卷全球，目前emoji已被大多数现代计算机系统所兼容的Unicode编码采纳，普遍应用于各种手机短信和社交网络中。

我们首先生成变量x和y，程序如下：

clear

cap mkdir E:\推文

cd E:\推文

set obs 12

gen x = _n

gen y = x + uniform()

运行结果如下：

图一

这时候新的数据就飞入你的碗里了，任你鱼肉了！还不试试！

我们生成一个新变量emoji，当x为1，2，……，12时，emoji对应为🐀，🐰，……，🐺。键入以下命令：

gen emoji = ustrunescape("\U0001f400") if x == 1

replace emoji = ustrunescape("\U0001f430") if x == 2

replace emoji = ustrunescape("\U0001f439") if x == 3

replace emoji = ustrunescape("\U0001f411") if x == 4

replace emoji = ustrunescape("\U0001f410") if x == 5

replace emoji = ustrunescape("\U0001f404") if x == 6

replace emoji = ustrunescape("\U0001f408") if x == 7

replace emoji = ustrunescape("\U0001f412") if x == 8

replace emoji = ustrunescape("\U0001f434") if x == 9

replace emoji = ustrunescape("\U0001f437") if x == 10

replace emoji = ustrunescape("\U0001f418") if x == 11

replace emoji = ustrunescape("\U0001f43a") if x == 12

注 ：emoji对应unicode转义字符见 附录 （比如：\U0001f400是🐀的转义字符， ustrunescape 函数是对unicode转义字符的解码）

我们键入edit查看一下stata中的数据，显示如下：

图二

这时，我们人间人爱，花见花开的emoji就进入到我们的数据中了。还等什么？赶紧利用起来吧！

键入以下命令：

scatter y x, mlabel(emoji) mlabsize(huge)

注 ：mlabel () 图形点的标签 ；

mlabsize ()        图形点标签的大小

显示如下：

图三

可爱的emoji表情就出现在我们的散点图中，可是标签离图形中的点有点远。所以我们得需要指定标签的位置，在这个时候呢，我们需要用到 mlabposition() 选项，它的作用是指定图形点标签的显示位置，0表示中心位置，1-12表示钟表方向。

键入以下命令：

scatter y x, mlabel(emoji) mlabposition(0) mlabsize(huge)

运行结果如下：

图四

这时emoji表情就和图形的点重合了，但是可爱的emoji表情已经面目全非了，我们需要把点去了，这点小事算什么？选项 msymbol() 可以完美解决这个问题，msymbol()选项的作用是改变点的形状，这里的 none 的意思是不显示点。键入以下命令：

scatter y x,msymbol(none) mlabel(emoji) mlabposition(0) mlabsize(huge)

运行结果如下：

图五

这才是我需要的清楚的emoji散点图。然而美中不足的是没有颜色，不用急，小编这就给你慢慢道来。在 windows系统 下，Stata的图像窗口中画出的emoji散点图显示黑白色，而在 Mac系统 下，Stata的图像窗口中画出的emoji散点图显示出了“真面目”，小编在这里就不演示了。如果想让你的图像显示出颜色怎么办呢？小编教你一招，把图片输出 svg格式 ，然后用浏览器打开，推荐用谷 歌浏览器 和 火狐浏览器 （小编用的是谷歌浏览器）。

键入以下命令：

graph export animals.svg, replace

shellout animals.svg

运行结果如下：

图六

这才是我们所要的emoji散点图，还不快来试试！体验独特的人生！

接下来，我们玩个小游戏，看看哪个动物得运气最好！程序如下：

gen y1=12*uniform()

twoway bar y1 x, color(ltkhaki) || ///

scatter y1 x, mlabel(emoji) mlabposition(12) ///

mlabcolor(black) mlabsize(huge) msymbol(none) legend(off)

graph export animals1.svg, replace

shellout animals1.svg

运行结果如下：

图七

可能你画出来的图和我不一样，不用急，这是因为生成一个随机数y1,然后根据x和y1画出柱形图和散点图。详情请见往期推文 《混搭图形》 。最后结果竟然是我们萌萌的小猪运气最高，果然傻猪有傻福，老天是眷顾猪的！运气最低的是大灰狼！是不是很刺激呢？一起和小编来试试吧！