rotate matrix of landmarks
rotate matrix of landmarks by using a rotation determined by two matrices.
rotonmat(X, refmat, tarmat, scale = TRUE, reflection = FALSE, weights = NULL, centerweight = FALSE, getTrafo = FALSE)
X |
Matrix to be rotated |
refmat |
reference matrix used to estimate rotation parameters |
tarmat |
target matrix used to estimate rotation parameters |
scale |
logical: requests scaling to minimize sums of squared distances |
reflection |
logical: if TRUE, reflections are allowed. |
weights |
vector of length k, containing weights for each landmark. |
centerweight |
logical: if weights are defined and centerweigths=TRUE, the matrix will be centered according to these weights instead of the barycenter. |
getTrafo |
logical: if TRUE, a 4x4 transformation matrix will also be returned. |
A matrix is rotated by rotation parameters determined by two different matrices. This is usefull, if the rotation parameters are to be estimated by a subset of landmark coordinates.
if getTrafo=FALSE the transformed X will be returned,
else alist containing:
Xrot |
the transformed matrix X |
trafo |
a 4x4 transformation matrix |
Stefan Schlager
data(nose) shortnose.rot <- rotonmat(shortnose.lm,shortnose.lm[1:9,],longnose.lm[1:9,]) ##view result ## Not run: deformGrid3d(shortnose.rot,shortnose.lm,ngrid=0) ## End(Not run)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.