#' @importFrom httr GET
#' @importFrom httr warn_for_status
#' @importFrom httr status_code
#' @importFrom httr content
extract_results <- function(x) {
httr::warn_for_status(x)
if (httr::status_code(x) == 200) {
return(httr::content(x)$result)
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.