memer 
Overview
memer is a a tidyverse-compatible R package for creating memes.
Mostly wrappers around magick functions.
Installation
# Install the development version from GitHub:
# install.packages("devtools")
devtools::install_github("sctyner/memer")Available Memes
library(memer)
meme_list()## [1] "AllTheThings" "AmericanChopper" "AncientAliens"
## [4] "BatmanRobin" "DistractedBf" "EvilKermit"
## [7] "ExpandingBrain" "FirstWorldProbs" "FryNotSure"
## [10] "HotlineDrake" "IsThisAPigeon" "NoneOfMyBusiness"
## [13] "CheersLeo" "OneDoesNotSimply" "DosEquisMan"
## [16] "OffRamp" "OprahGiveaway" "Philosoraptor"
## [19] "PicardFacePalm" "PicardWTH" "Purples"
## [22] "PutItPatrick" "Rainbow" "ShiaJustDoIt"
## [25] "Spongebob" "SuccessKid" "ThatWouldBeGreat"
## [28] "TheRockDriving" "ThinkAboutIt" "TrumpBillSigning"
## [31] "TwoButtonsAnxiety" "WhatIfIToldYou" "CondescendingWonka"
## [34] "YoDawg" "YoDawg" "Y-U-NOguy"
Usage
meme_get("DistractedBf") %>%
meme_text_distbf("tidyverse", "new R users", "base R")
meme_get("OprahGiveaway") %>%
meme_text_bottom("EVERYONE GETS A %>%!!!", size = 36)
meme_get("AmericanChopper") %>%
meme_text_chopper("Stop calling yourself 'just an R user'!",
"But I've never written a package!",
"So?? You're still an important part of the R community!",
"But people who write packages are more important",
"NO! All members of the R community are valued & deserve respect!")
Post R Memes directly to Twitter!
meme_get("ExpandingBrain") %>%
meme_text_brain("Sharing memes online",
"Making your own memes",
"Making memes in R",
"Using rtweet to share your memes",
size = 17)
You can also post memes directly to Twitter. You will need to install
the rtweet package for that. Just
make sure to set up a Twitter token (see here for more information on
that) and you are good to go.
The meme_tweet function also includes the possibility to tag the R
Memes for Statistical Fiends account
on Twitter for maximum exposure :)
meme_get("DosEquisMan") %>%
meme_text_top("I don't always tweet memes", size = 28) %>%
meme_text_bottom("But when I do\nI use the memer package in R", size = 26) %>%
meme_tweet(tweet_text = "It's dangerous to meme alone. Here take this.",
tag_rstatsmemes = T)
Confused? Use meme_explain()!
Using meme_explain, you can pass any of the meme names to be taken to
their page on knowyourmeme.com.
memer have no control over what you may see
when using meme_explain().
meme_explain("DistractedBf", launch = F, content_warning = T)> knowyourmeme can contain potentially offensive results,
are you sure you want to open it? [Y]es / [N]o:
Add your own meme!
If you want to add your own meme, use memer:::meme_add():
- Fork this repo and clone to your system.
- Add your meme file to
inst/extdata.- It should be a .png.
- It should be small: resolution of 72 and width no more than 500 pixels.
- Use
meme_add()as below.
setwd("path/to/your/memer")
meme_add("Memename", "memefile.png")- Re-install
memeras below:
devtools::check(document = F)
devtools::install()- (Optional) If you would like your meme to be added to
memer, submit a pull request!