Learn R Programming

Rvcg (version 0.24)

vcgNonBorderEdge: Get all non-border edges

Description

Get all non-border edges and both faces adjacent to them.

Usage

vcgNonBorderEdge(mesh, silent = FALSE)

Value

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

Arguments

mesh

triangular mesh of class 'mesh3d

silent

logical: suppress output of information about number of border edges

See Also

vcgGetEdge

Examples

Run this code

data(humface)
edges <-vcgNonBorderEdge(humface)
## show first edge (not at the border)
if (FALSE) {
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.
}

Run the code above in your browser using DataLab