R/statquote.R

Defines functions sq_get_quote

sq_get_quote <- function(topic = NULL) {
  quote <- statquotes::statquote(topic = topic)
  class(quote) <- c("quote", class(quote))
  quote
}
emitanaka/quoter documentation built on Nov. 4, 2019, 11:53 a.m.