# NOT RUN {
res <- observation(dataset = "ctb0003", variable = "taxon",
progress = FALSE, verbose = FALSE)
res <- febr2spdf(obj = res)
sp::spplot(obj = res, zcol = "taxon_sibcs_2009",
auto.key = list(columns = 3), scales = list(draw = TRUE))
# }
Run the code above in your browser using DataLab