powered by
plotNormals(x, long = 1, lwd = 1, col = 1)
require(rgl) data(nose) plotNormals(shortnose.mesh,col=4,long=0.01) shade3d(shortnose.mesh,col=3)
Run the code above in your browser using DataLab