TRI model from silicate is extended by methods for QUAD.
# S3 method for QUAD TRI(x, ...)
x | QUAD |
---|---|
... | reserved |
a TRI model, as per silicate package
library(anglr) library(raster) v <- volcano[1:10, 1:6] r <- setExtent(raster(v), extent(0, nrow(v), 0, ncol(v))) a <- QUAD(r) x <- copy_down(TRI(a), r) nrow(x$vertex)#> [1] 77sc <- silicate::SC(x) #mesh <- DEL(sc, max_area = .2) #mesh <- copy_down(mesh, r) #nrow(mesh$vertex)