#' Query the GDC for current status
#'
#' @param version (optional) character(1) version of GDC
#'
#' @return List describing current status.
#'
#' @importFrom httr content
#'
#' @examples
#' status()
#'
#' @export
status <- function(version=NULL) {
response <- .gdc_get(paste(version, "status", sep="/"),archive='default')
content(response, type="application/json")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.