powered by
autocrop(mesh, maxLength, maxItr)
gpc.poly
polyAutocrop
tri.mesh
data(tritest) mesh <- tri.mesh(tritest$x, tritest$y) plot(mesh) ply <- autocrop(mesh, maxLength = 0.5, maxItr = 100) plot(ply, add = TRUE, poly.args = list(col = 2))
Run the code above in your browser using DataLab