Creating a birthday graph in ggplot2

bday_plot.R

devtools::install_github("dill/emoGG")
library(emoGG)

emoji_search("birthday")

bday_plot <- data.frame(x = c(10, 15, 23, 27, 43, 56, 62, 76, 84, 92, 95), 
                        y = c(12, 71, 17, 84, 33, 70, 26, 82, 16, 26, 90))

ggplot() +
  geom_text(aes(x = 50, y = 50),label = "Happy Birthday!", 
            size = 10, color = "darkblue") +
  coord_cartesian(xlim = c(0, 100), ylim = c(0, 100)) +
  geom_emoji(data = bday_plot, aes(x = x, y = y), emoji="1f382", size = .1)

Hi Jen!

This is awesome! Is it possible for me to adapt this code to make a tutorial on how to use ggplot for some students I work with?

Certainly! Have fun!

…

On Wed, Aug 3, 2022 at 8:06 AM tatiannadugue ***@***.***> wrote: ***@***.**** commented on this gist. ------------------------------ Hi Jen! This is awesome! Is it possible for me to adapt this code to make a tutorial on how to use ggplot for some students I work with? — Reply to this email directly, view it on GitHub <https://gist.github.com/66ea1033fdcf71c2e8ad6d00fd32e54f#gistcomment-4254657>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/AEUSL7EHWLIY3MI6I3SAXVLVXJVGLANCNFSM55OZD7VQ> . You are receiving this because you authored the thread.Message ID: ***@***.***>