Skip to content

Cal-Poly-Advanced-R/meangirls

Repository files navigation

meangirls

The goal of meangirls is to create quotes in the style of the 2004 instant classic movie, Mean Girls.

Installation

You can install the the development version from GitHub with:

# install.packages("devtools")
devtools::install_github("Cal-Poly-Advanced-R/meangirls")
library(meangirls)

insults

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!

compliments

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.

Negating compliments

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.

Handing out candygrams

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.

Extra comments

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."

About

A silly package for practicing

Resources

License

Stars

Watchers

Forks

Releases

No releases published

Packages

No packages published

Languages