Morpho (version 2.12)

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
)

Value

if getTrafo=FALSE the transformed X will be returned, else alist containing:

Xrot

the transformed matrix X

trafo

a 4x4 transformation matrix

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.

Author

Stefan Schlager

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
if (FALSE) {
deformGrid3d(shortnose.rot,shortnose.lm,ngrid=0)
}