#' 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)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.