# NOT RUN {
# set up a cache to store data to avoid downloading repeatedly
start_using_memoise()
# check currently available datasets
get_available_datasets()
# initialise a data set in the United Kingdom
# at the UTLA level
utla <- UK$new(level = "2")
# download UTLA data
utla$download()
# clean UTLA data
utla$clean()
# inspect available level 1 regions
utla$available_regions(level = "1")
# filter data to the East of England
utla$filter("East of England")
# process UTLA data
utla$process()
# return processed and filtered data
utla$return()
# inspect all data steps
utla$data
# initialise Italian data, download, clean and process it
italy <- initialise_dataclass("Italy", get = TRUE)
italy$return()
# initialise ECDC data, fully process it, and return totals
ecdc <- initialise_dataclass("ecdc", get = TRUE, totals = TRUE)
ecdc$return()
# }
Run the code above in your browser using DataLab