Morpho (version 2.1)

rotonmat: rotate matrix of landmarks

Description

rotate matrix of landmarks by using a rotation determined by two matrices.

Usage

rotonmat(X, refmat, tarmat, scale = TRUE, reflection = FALSE,
  weights = NULL, centerweight = FALSE, getTrafo = FALSE)

Arguments

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.

Value

• if getTrafo=FALSE the transformed X will be returned, else alist containing:
• Xrot
  the transformed matrix X
• trafo
  a 4x4 transformation matrix

Details

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.

See Also

rotonto,rotmesh.onto

Examples

data(nose)
shortnose.rot <-
rotonmat(shortnose.lm,shortnose.lm[1:9,],longnose.lm[1:9,])

##view result
deformGrid3d(shortnose.rot,shortnose.lm,ngrid=0)