R语言 emojifont包简介

在这篇文章中，我们将看到如何使用R语言中的emojifont包。这个包的目的是将emoji字体引入R编程语言。

我们将看看如何使用emojifont包来搜索和打印表情符号。

安装

要安装这个包，请在终端键入以下命令。

install.packages(“emojifont”)

R语言中的emoji字符

现在我们已经安装了emojifont包，所以我们将使用 library(emojifont) 导入它。为了打印emoji，我们将使用 emoji(“emojiname”) 来搜索emoji，我们将使用search_emoji(“name”)，这将返回所有相关的emoji，我们将把它存储为一个列表并使用 emoji() 来打印。

# importing package
library(emojifont)
 
# printing joy emoji
emoji("joy")
 
# searching emoji
list <- c(search_emoji("joy"))
 
# printing all the emoji's in the list
emoji(list)

输出

R语言中的emojifont包简介

R中的表情符号

获得一个随机的表情符号样本

为了获得随机的表情符号，我们将使用 sample_emoji(x) 来获得随机的表情符号。

# importing package
library(emojifont)
 
# getting random sample of emojis
list = c(sample_emoji(10))
 
# printing all the emoji's in list
emoji(list)

输出

R语言中的emojifont包简介

表情符号的随机样本

R图中的表情符号

方法1：使用基础图谱

plot()用于绘制图表，其中x和y是坐标。

plot(x, y, …)

“… “是传递给图形参数等方法的参数。

text()用于绘制向量标签，其中x、y为坐标。

text (x, y = NULL, labels = seq_along(x$x), cex = 1, col = NULL, ...)

# importing package
library(emojifont)
 
 
# generating random numbers for x-axis
set.seed(200)
 
# gets 10 random point on x axis from
# seed
x <- rnorm(10)
 
# generating random numbers for y-axis
set.seed(100)
 
# gets 10 random point on y axis from
# seed
y <- rnorm(10)
 
# Plotting a blank chart in order to
# clear the screen
# if any chart is already opened
# or the emoji's will overlap
plot(x, y, cex = 0)
 
# plotting chart
text(x, y, labels=emoji('joy'), cex=3.5, col='red',
     family='EmojiOne')

输出

R语言中的emojifont包简介

方法2：使用ggplot

ggplot() 用于绘制图表，其中数据是我们的数据框架，aes()描述了内容将如何在屏幕上绘制出来。

ggplot(data = NULL, mapping = aes(), ...)

# importing package
library(emojifont)
library(ggplot2)
 
# generating random numbers for x-axis
set.seed(200)
 
# gets 10 random point on x axis from
# seed
x <- rnorm(10)
 
# generating random numbers for y-axis
set.seed(100)
 
# gets 10 random point on y axis from
# seed
y <- rnorm(10)
 
# defining data frame
data <- data.frame(x=x,y=y)
 
# plotting chart
ggplot(data,aes(x, y, color="red", label=emoji('joy'))) +
  geom_text(family="EmojiOne", size=6)

输出

R语言中的emojifont包简介

方法3：使用Geom_emoji

geom_emoji() 作为一个包装器，用于将emoji可视化。

# importing package
library(emojifont)
library(ggplot2)
 
# plotting emoji
ggplot() + geom_emoji("joy", color='red') + theme_void()

输出

R语言中的emojifont包简介

方法4：Font Awesome

geom_fontawesome() 作为一个包装器，用于将fontawesome可视化。

# importing package
library(emojifont)
library(ggplot2)
 
# plotting emoji
ggplot() + geom_fontawesome("fa-desktop",
                            color='black') + theme_void()