if (FALSE) {
library(dplyr)
library(sf)
library(itsdm)
bry <- st_polygon(
list(rbind(c(29.34, -11.72), c(29.34, -0.95),
c(40.31, -0.95), c(40.31, -11.72),
c(29.34, -11.72)))) %>%
st_sfc(crs = 4326)
cmcc_bios <- cmcc_bioclim(bry = bry,
nm_mark = 'tza', path = tempdir())
}
Run the code above in your browser using DataLab