# NOT RUN {
# get country level data
jrc_level_1 <- JRC$new(level = "1", verbose = TRUE, steps = TRUE, get = TRUE)
jrc_level_1$return()
# show available regions with data at the first level of interest (country)
jrc_level_1$available_regions()
# get region level data
jrc_level_2 <- JRC$new(level = "2", verbose = TRUE, steps = TRUE, get = TRUE)
jrc_level_2$return()
# show available regions with data at the second level of interest (region)
jrc_level_2$available_regions()
# }
Run the code above in your browser using DataLab