Cada emoji se puede especificar con un código. Puedes hacer uso de la función emoji_search para buscar el código del emoji que quieres usar.
# install.packages("remotes")
# remotes::install_github("dill/emoGG")
library(emoGG)
# Buscar emojis de flores (flowers)
emoji_search("flower")
| emoji | code | keyword | |
|---|---|---|---|
| 1928 | wilted_flower | 1f940 | flower |
| 1940 | cherry_blossom | 1f338 | flower |
| 2748 | rosette | 1f3f5 | flower |
| 4130 | o | 2b55 | circle |
| 4131 | o | 2b55 | round |
| 5234 | eritrea | 1f1ea | er |
En la sección anterior buscamos emojis relacionados con flores. Si eliges el emoji cherry_blossom tienes que pasar su código a la función geom_emoji tal y como se muestra en el siguiente bloque de código.
# install.packages("remotes")
# remotes::install_github("dill/emoGG")
library(emoGG)
# install.packages("ggplot2")
library(ggplot2)
# Gráfico
ggplot(iris, aes(Sepal.Length, Sepal.Width)) +
geom_emoji(emoji = "1f938")

Otro ejemplo puede ser agregar diamantes al conjunto de datos diamonds. En este caso el código correspondiente es "1f48e".
# install.packages("remotes")
# remotes::install_github("dill/emoGG")
library(emoGG)
# install.packages("ggplot2")
library(ggplot2)
# Subconjunto del conjunto de datos diamons
set.seed(5)
dmnds <- diamonds[sample(nrow(diamonds), 800), ]
# Gráfico con emojis de diamantes
ggplot(dmnds, aes(carat, price)) +
geom_emoji(emoji = "1f48e")


El paquete proporciona una función adicional llamada add_emoji, que permite agregar un emoji como imagen de fondo. En el siguiente ejemplo estamos añadiendo el emoji de un coche a un gráfico de dispersión hecho con el conjunto de datos mtcars.
# install.packages("remotes")
# remotes::install_github("dill/emoGG")
library(emoGG)
# install.packages("ggplot2")
library(ggplot2)
# Gráfico con coche
ggplot(mtcars, aes(wt, mpg)) +
geom_point() +
add_emoji(emoji = "1f697")
También te puede interesar