# NOT RUN {
vars <- raster::stack(system.file("extdata", "variables.tif",
package = "rangemap"))
names(vars) <- c("bio5", "bio6", "bio13", "bio14")
raster::plot(vars)
# }
Run the code above in your browser using DataLab