# \donttest{
ds <- get_datasets()
rates <- get_bis(ds$url[ds$id == "full_cbpol_m_csv"], auto_pivot = FALSE)
rates <- subset(rates, ref_area %in% c("US", "DE", "JP"))
rates <- pivot_longer_bis(rates)
# }
Run the code above in your browser using DataLab