Last chance! 50% off unlimited learning
Sale ends in
Performs a double principal coordinate analysis
dpcoa(df, dis = NULL, scannf = TRUE, nf = 2, full = FALSE, tol = 1e-07,
RaoDecomp = TRUE)
# S3 method for dpcoa
plot(x, xax = 1, yax = 2, …)
# S3 method for dpcoa
print (x, …)
# S3 method for dpcoa
summary (object, …)
a data frame with samples as rows and categories (i.e. species) as columns and abundance or presence-absence as entries. Previous releases of ade4 (<=1.6-2) considered the transposed matrix as argument.
an object of class dist
containing the distances between the categories.
a logical value indicating whether the eigenvalues bar plot should be displayed
a logical value indicating whether Rao diversity decomposition should be performed
if scannf is FALSE, an integer indicating the number of kept axes
a logical value indicating whether all non null eigenvalues should be kept
a tolerance threshold for null eigenvalues (a value less than tol times the first one is considered as null)
an object of class dpcoa
the column number for the x-axis
the column number for the y-axis
…
further arguments passed to or from other methods
Returns a list of class dpcoa
containing:
call
a numeric value indicating the number of kept axes
a numeric vector containing the weights of the elements (was
w1
in previous releases of ade4)
a numeric vector containing the weights of the samples (was
w2
in previous releases of ade4)
a numeric vector with all the eigenvalues
a numeric vector containing diversities within samples
an object of class dist
containing the dissimilarities between samples
a data frame with the decomposition of the diversity
a data frame with the coordinates of the elements (was
l1
in previous releases of ade4)
a data frame with the coordinates of the samples (was
l2
in previous releases of ade4)
a data frame with the scores of the principal axes of the elements
Pavoine, S., Dufour, A.B. and Chessel, D. (2004) From dissimilarities among species to dissimilarities among communities: a double principal coordinate analysis. Journal of Theoretical Biology, 228, 523--537.
# NOT RUN {
data(humDNAm)
dpcoahum <- dpcoa(data.frame(t(humDNAm$samples)), sqrt(humDNAm$distances), scan = FALSE, nf = 2)
dpcoahum
if(adegraphicsLoaded()) {
g1 <- plot(dpcoahum)
} else {
plot(dpcoahum)
}
# }
# NOT RUN {
data(ecomor)
dtaxo <- dist.taxo(ecomor$taxo)
dpcoaeco <- dpcoa(data.frame(t(ecomor$habitat)), dtaxo, scan = FALSE, nf = 2)
dpcoaeco
if(adegraphicsLoaded()) {
g1 <- plot(dpcoaeco)
} else {
plot(dpcoaeco)
}
# }
Run the code above in your browser using DataLab