R/dadjoke.R
In emitanaka/quoter: Quotes extracted from various sources
Defines functions
dj_get_joke
dj_get_joke <- function() {
quote <- data.frame(
topic = "dad joke",
text = suppressMessages(dadjoke::groan(sting = FALSE)),
source = "Dad Joke"
)
class(quote) <- c("quote", class(quote))
quote
}
emitanaka/quoter documentation built on Nov. 4, 2019, 11:53 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions dj_get_joke
dj_get_joke <- function() {
quote <- data.frame(
topic = "dad joke",
text = suppressMessages(dadjoke::groan(sting = FALSE)),
source = "Dad Joke"
)
class(quote) <- c("quote", class(quote))
quote
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.