stats19.download <- function(type = c("acc","cas","veh"),year){
#Get List of Datasets from Data.GOV.UK
link <- "https://data.gov.uk/api/3/action/package_show?id=road-accidents-safety-data"
jsonlite::fromJSON(link, simplifyVector = FALSE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.