powered by
vcgCurve(mesh)
data(humface) curv <- vcgCurve(humface) ##visualise per vertex mean curvature require(Morpho) meshDist(humface,distvec=curv$meanvb,from=-0.2,to=0.2,tol=0.01)
Run the code above in your browser using DataLab