如何在R中使用emo包在ggplot2中显示表情符号？

1> Wimpel..：

---

使用emojifont包:)

在这里阅读更多

library(ggplot2)
library(emojifont)

names = c("smile","school","office","blush","smirk","heart_eyes")
n = length(names):1
e = sapply(names, emojifont::emoji)
dat = data.frame(emoji_name = names, n = n, emoji = e, stringsAsFactors = F)

ggplot(data=dat, aes(emoji_name, n)) + 
  geom_bar(stat = "identity") +
  scale_x_discrete(breaks = dat$emoji_name, labels = dat$emoji) +
  theme( axis.text.y =element_text( size=20 ) ) +
  coord_flip()

> sessionInfo()
R version 3.5.1 (2018-07-02)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows >= 8 x64 (build 9200)

---

@Wimpel这是一个误导性的警告信息,实际上意味着它在CRAN上不可用,而不是它不适用于你的R版本.`emo`只在github上:https://github.com/hadley/emo