Get all non-border edges
Get all non-border edges and both faces adjacent to them.
vcgNonBorderEdge(mesh, silent = FALSE)
mesh |
triangular mesh of class 'mesh3d |
silent |
logical: suppress output of information about number of border edges |
returns a dataframe containing:
vert1 |
integer indicating the position of the first vertex belonging to this edge |
vert2 |
integer indicating the position of the second vertex belonging to this edge |
border |
integer indicating if the edge is at the border of the mesh. 0 = no border, 1 = border |
face1 |
integer pointing to the first face adjacent to the edge |
face2 |
integer pointing to the first face adjacent to the edge |
data(humface) edges <-vcgNonBorderEdge(humface) ## show first edge (not at the border) ## Not run: require(Morpho) require(rgl) lines3d(t(humface$vb[1:3,])[c(edges$vert1[1],edges$vert2[2]),],col=2,lwd=3) ## plot barycenters of adjacent faces bary <- barycenter(humface) points3d(bary[c(edges$face1[1],edges$face2[1]),]) shade3d(humface, col=3) ## now find the edge - hint: it is at the neck. ## End(Not run)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.