Nothing
## ----eval=FALSE---------------------------------------------------------------
# library(wbids)
## ----eval=FALSE---------------------------------------------------------------
# # Step 1: Get list of available files
# files <- ids_bulk_files()
#
# # Step 2: Download each file
# data_list <- lapply(files$file_url, ids_bulk)
#
# # Step 3: Combine all data
# full_data <- rbind(data_list)
## ----eval=FALSE---------------------------------------------------------------
# full_data <- ids_get_ed("debt_statistics")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.