R/fe_base_url.R

In muschellij2/fedreporter: Interface to Federal 'RePORTER' API

#' Federal Exporter Base URL
#'
#' @param secure Should https be used (may be necessary)
#'
#' @return Character vector (length 1)of URL
#' @export
#'
#' @examples
#' fe_base_url()
fe_base_url = function(secure = TRUE) {
  url = "http"
  if (secure) {
    url = paste0(url, "s")
  }
  url = paste0(url, "://api.federalreporter.nih.gov")
  return(url)
}