| supcol {ade4} | R Documentation |
performs projections of supplementary columns.
supcol(x, ...) ## Default S3 method: supcol(x, Xsup, ...) ## S3 method for class 'coa': supcol(x, Xsup, ...)
x |
an object used to select a method |
Xsup |
an array with the supplementary columns (Xsup and x$tab have the same row number) |
... |
further arguments passed to or from other methods |
If supcol.default is used, the column vectors of Xsup are projected without prior modification onto the principal components of dudi with the scalar product associated to the row weightings of dudi.
A list of two components:
|
data frame containing the array with the supplementary columns transformed or not |
|
data frame containing the coordinates of the supplementary projections |
Daniel Chessel
Anne B Dufour dufour@biomserv.univ-lyon1.fr
data(rpjdl)
rpjdl.coa <- dudi.coa(rpjdl$fau, scan = FALSE, nf = 4)
rpjdl.coa$co[1:3,]
supcol (rpjdl.coa,rpjdl$fau[,1:3])$cosup # the same
data(doubs)
dudi1 <- dudi.pca(doubs$poi, scal = FALSE, scan = FALSE)
s.arrow(dudi1$co)
s.arrow(supcol.default(dudi1,data.frame(scalewt(doubs$mil)))$cosup,
add.p = TRUE, clab = 2)
symbols(0, 0, circles = 1, inches = FALSE, add = TRUE)