align_arun {conmolfields}R Documentation

Rigin alignment with Arun algorithm

Description

Rigin alignment with Arun algorithm

Usage

align_arun(p_i, p1_i)

Arguments

p_i
p1_i

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (p_i, p1_i) 
{
    p <- rowMeans(p_i)
    p1 <- rowMeans(p1_i)
    q_i <- p_i - p
    q1_i <- p1_i - p1
    H <- q_i %*% t(q1_i)
    s <- svd(H)
    U <- s$u
    V <- s$v
    X <- V %*% t(U)
    detx <- det(X)
    R <- X
    T <- p1 - R %*% p
    list(R = R, T = T, detx = detx)
  }

[Package conmolfields version 0.0-19 Index]