getPLSCommonShape: Get the linear combinations associated with the common shape change in each latent dimension of a pls2B

Description

Get the linear combinations associated with the common shape change in each latent dimension of a pls2B

Usage

getPLSCommonShape(pls)

Arguments

pls

object of class "pls2B"

Value

returns a list containing

shapevectors

matrix with each containing the shapevectors (in column- major format) of common shape change associated with each latent dimension

XscoresScaled

Xscores scaled according to shapevectors

YscoresScaled

Yscores scaled according to shapevectors

commoncenter

Vector containing the common mean

lmdim

dimension of landmarks

References

Mitteroecker P, Bookstein F. 2007. The conceptual and statistical relationship between modularity and morphological integration. Systematic Biology 56(5):818-836.

Examples

Run this code

# NOT RUN {
data(boneData)
proc <- procSym(boneLM)
pls <- pls2B(proc$orpdata[1:4,,],proc$orpdata[5:10,,])
commShape <- getPLSCommonShape(pls)
## get common shape for first latent dimension at +-2 sd of the scores
## (you can do this much more convenient using \code{\link{plsCoVarCommonShape}}
scores <- c(-2,2) * sd(c(commShape$XscoresScaled[,1],commShape$XscoresScaled[,2]))
pred <- showPC(scores,commShape$shapevectors[,1],matrix(commShape$commoncenter,10,3))
# }
# NOT RUN {
deformGrid3d(pred[,,1],pred[,,2])
# }