emojifont新功能（有视频哦）
有多少人是看到有视频点进来的？是不是特别鸡冻想要看Y叔长啥样？视频在最后哦！
在写2月15号的推文《画❤️装geek什么的，都弱爆了！😜》时，画下面这个gif时，我是用base plot来画的，因为用ggplot2还麻烦点。
用ggplot2是这样画的：
而用base plot，则相对简单些：
第二天，我发了文字推送，提出了要写个geom_emoji图层的想法。
又过了一天，我就写了geom_emoji，于是如果我想看某个emoji长什么样，比如下面画个玫瑰花：
ggplot() + geom_emoji("rose") + theme_void()
这次的更新，我还换个emoji字体，升级到unicode 9，也就是最新加入的鸭子也能用咯：
ggplot() + geom_emoji("duck") + theme_void()geom_emoji让画散点也变得简单，
x <- seq(-sqrt(17), sqrt(17), length.out=30)
y1 <- 8*abs(x)/17 + 15* sqrt(17 - x^2)/17
y2 <- 8*abs(x)/17 - 15* sqrt(17 - x^2)/17
ggplot() + geom_emoji("gift_heart",
x=x, y=c(y1, y2), color="red", size=10)大家肯定最想看的是制作动图gif的代码，这个代码非常简单，简直如同人类语言一般：
require(ggplot2)
require(magick)
require(purrr)
x <- search_emoji("heart")
plot_heart=function(x) {
p = ggplot() + geom_emoji(x)
o = paste0(x, ".png")
ggsave(o, p, width=5, height=5)
o
}
x %>% map(plot_heart) %>%
map(image_read) %>%
image_join() %>%
image_animate(fps=1) %>%
image_write("heart.gif")因为换了字体，所以和之前的不同，如果要去背景，只需要+theme_void()就可以。
新版也不同你加载字体的，随包载入自动加载，当然以前的字体还能用，还用一样的办法手工加载。（所以说我这次升级很考究，原来的字体，老方法，新字体你啥都不用干）
同时加入的还有geom_fontawesome图层，最新画hex sticker，用fontawesome蛮好用 -,-
这次更新，主要有3方面：升级了新字体，支持unicode 9；新加入的图层让你非常方便地看一看emoji表情长啥样；再者不需要手工加载字体了。
在《使用emoji画图》一文中，列出了一些别人做的图：比如数据冲浪，上面的例子中你已然知道怎么做出类似的动图；再比如十二生肖做x轴的柱状图，这个在后面的视频中会有演示。
视频是香港R用户组的教学视频，我也是在网上看到，才发现我被‘出镜了’，讲解了emojifont包，好像我在香港还有点小名气，然而我并没有露过脸，视频中也没有。
https://v.qq.com/txp/iframe/player.html?vid=x0384df21pt&width=500&height=375&auto=0
转发才是真爱，嗯，必定是这样！
真爱的人，看完还想看：
1. 使用emoji画图
4.食色性也