R/packages.R

In rjlopez2/applepie: Client to Access the 'R-Universe' 'API'

#' Packages
#'
#' @param universe universe to query
#'
#' @return A character vector.
#' @export
#'
#' @examples
#' get_packages("ropensci")
get_packages <- function(universe) {
  url <- sprintf("https://%s.r-universe.dev/packages", universe)
  resp <- httr::RETRY("GET", url)
  httr::stop_for_status(resp, "take off")
  content <- httr::content(resp)
  unlist(content)
}