R/fetch_citation.R

In murphy-xq/fetchdhs: Retrieve DHS API Data with R

#' Fetch citation
#'
#' \code{fetch_citation} returns a DHS API citation.
#' @importFrom magrittr %>%
#' @export
fetch_citation <- function() {
  jsonlite::fromJSON("https://api.dhsprogram.com/rest/dhs/info/citation") %>%
    .$Data %>%
    .$Value
}