placeDowels | R Documentation |
Place Dowels representing tissue depth on a skull by using predefined tissue-values
placeDowels(
lm,
mesh,
ldowel,
render = TRUE,
col = 1,
radius = 1,
meshcol = 3,
fine = 50,
smooth = TRUE,
dowelcol = NULL
)
lm |
k x 3landmarks representing dowel locations |
mesh |
triangular mesh (object of class 'mesh3d') |
ldowel |
vector of length k giving a length for each dowel |
render |
logical: if TRUE, the result will be rendered in an rgl window |
col |
color of the dowels |
radius |
numeric: diameter of dowels |
meshcol |
mesh color |
fine |
integer: amount of vertices to generate the cylinders representing tissue thickness. |
smooth |
logical: use smoothed normals for dowel orientation |
For orientation of the dowels, the (angle weighted) normal vectors of the surface is used.
an invisible list with
dowels |
a list containing the meshes for all dowels |
endpoints |
a matrix containing the coordinates of the dowels endpoints |
cylinder
require(Rvcg)
data(humface)
lms <- matrix(c(17.6061 , 9.2072 , -6.9917 , 44.7959 , 37.1135 ,
76.0469 , 3.7734 , 12.8234 , 81.3138 , 63.4207 ,
47.5009 , 44.6468), 4, 3)
#place markers of 5mm length
## Not run:
placeDowels(lms, humface, rep(5, 4))
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.