The ade4 Package - NexTag Supports Open Source Initiatives

lingoes 145
Examples
data(lascaux)
par(mfrow = c(2,2))
barplot(dudi.pca(lascaux$meris, scan = FALSE)$eig)
title(main = "Meristic")
barplot(dudi.pca(lascaux$colo, scan = FALSE)$eig)
title(main = "Coloration")
barplot(dudi.pca(na.omit(lascaux$morpho), scan = FALSE)$eig)
title(main = "Morphometric")
barplot(dudi.acm(na.omit(lascaux$orne), scan = FALSE)$eig)
title(main = "Ornemental")
par(mfrow = c(1,1))
lingoes
Transformation of a Distance Matrix for becoming Euclidean
Description
transforms a distance matrix in a Euclidean one.
Usage
lingoes(distmat, print = FALSE)
Arguments
distmat
print
an object of class dist
if TRUE, prints the eigenvalues of the matrix
Details
The function uses the smaller positive constant k which transforms the matrix of
an Euclidean one
√
d 2 ij + 2 ∗ k in
Value
returns an object of class dist with a Euclidean distance
Author(s)
Daniel Chessel
Stéphane Dray 〈dray@biomserv.univ-lyon1.fr〉
References
Lingoes, J.C. (1971) Some boundary conditions for a monotone analysis of symmetric matrices.
Psychometrika, 36, 195–203.