powered by
dissection(x, s = 5, ...)
library(raster) data(elev) d <- dissection(elev, s=5) plot(d, main="dissection")
Run the code above in your browser using DataLab