biome2<-crop(biome1, ext2) label1=paste0("Biomes ", as.character(abs(time1)), " BP") plot(biome2, legend=T, main=label1) png("out.png", width = 2200, height = 700...
png") downscale_machine <- function (valu0, instak1) print(".*.") stop(-1) bsd1 <- calc(cld1, fun = macroBiome:::cldn2bsdf) print("Calculating biomes...
