The goal of meangirls is to create quotes in the style of the 2004 instant classic movie, Mean Girls.
You can install the the development version from GitHub with:
# install.packages("devtools")
devtools::install_github("Cal-Poly-Advanced-R/meangirls")
library(meangirls)
You can use the function boo()
to deliver a generic insult:
boo("jerk")
#> Boo, you jerk
You can use the function fetch()
to insult someone’s made-up slang
word.
fetch("Gretchen", "fetch")
#> Gretchen, stop trying to make fetch happen! It's not going to happen!
You can use the function nice_style()
to compliment someone’s fashion
choices.
The default adjective is “vintage”, but you can supply your own.
nice_style("bracelet")
#> I love your bracelet! Where did you get it? So vintage!
nice_style("bracelet", adjective = "colorful")
#> I love your bracelet! Where did you get it? So colorful!
You can use the function really_pretty()
to tell someone they are
pretty.
really_pretty("Cady", follow_up = FALSE)
#> You're, like, really pretty, Cady.
Both compliments can be negated with a follow-up phrase:
really_pretty("Cady", follow_up = TRUE)
#> [1] "You're, like, really pretty, Cady. So you agree? You think you're really pretty?"
nice_style("bracelet", follow_up = TRUE)
#> I love your bracelet! Where did you get it? So vintage!
#> That's the ugliest effing bracelet I've ever seen.
Finally, you can use the give_candygrams()
function to announce the
number of candygrams a person gets.
give_candygrams("Taylor Zimmerman", 2)
#> Two for Taylor Zimmerman.
You can also give extra commentary to your announcement:
give_candygrams("Taylor Zimmerman", 2,
extra_message = "Merry Christmas!")
#> Two for Taylor Zimmerman.
Some special cases trigger automatic extra commentary or special behavior:
give_candygrams("Glen Coco", 4)
#> Four for Glen Coco.
give_candygrams("Gretchen Weiners", 4)
#> [1] "None for Grethen Weiners."