r <- rast(ncols=100, nrows=100)
values(r) <- 1:ncell(r)
x <- rast(ncols=2, nrows=2)
getTileExtents(r, x)
getTileExtents(r, x, buffer=3)
# auto: tile size from GDAL block size and a per-worker memory budget
getTileExtents(r) # cores = 1
getTileExtents(r, cores=4) # smaller tiles, sized for 4 concurrent workers
filename <- paste0(tempfile(), "_.tif")
ff <- makeTiles(r, x, filename)
ff
vrt(ff)
Run the code above in your browser using DataLab