betadisper
is a multivariate analogue of Levene's test for
homogeneity of variances. Non-euclidean distances between objects and
group centroids are handled by reducing the original distances to
principal coordinates. This procedure has latterly been used as a
means of assessing beta diversity.betadisper(d, group, type = c("centroid", "median"))## S3 method for class 'betadisper':
anova(object, \dots)
permDisper(object, control = permControl(nperm = 999))
## S3 method for class 'betadisper':
scores(x, display = c("sites", "centroids"),
choices = c(1,2), ...)
## S3 method for class 'betadisper':
plot(x, axes = c(1,2), cex = 0.7, hull = TRUE,
ylab, xlab, main, sub, ...)
## S3 method for class 'betadisper':
boxplot(x, ylab = "Distance to centroid", ...)
as.factor
.type =
"centroid"
is currently supported."betadisper"
, the result of a
call to betadisper
.permControl
."sites"
or "species"
.plot.default
.anova
method returns an object of class "anova"
inheriting from class "data.frame"
. permDisper
returns an object of class "permDisper"
, a list
with components tab
, the ANOVA table which is an object
inheriting from class "data.frame"
, and control
, the
result of a call to permControl
..
The scores
method returns a list with one or both of the
components "sites"
and "centroids"
.
The plot
function invisibly returns an object of class
"ordiplot"
, a plotting structure which can be used by
identify.ordiplot
(to identify the points) or other
functions in the ordiplot
family.
The boxplot
function invisibly returns a list whose components
are documented in boxplot
.
betadisper
returns a list of class "betadisper"
with the
following components:
However, better measures of distance than the Euclidean distance are available for ecological data. These can be accommodated by reducing the distances produced using any dissimilarity coefficient to principal coordinates, which embeds them within a Euclidean space. The analysis then proceeds by calculating the Euclidean distances between group members and the group centroid on the basis of the principal coordinate axes rather than the original distances. Non-metric dissimilarity coefficients can produce principal coordinate axes that have negative Eigenvalues. These correspond to the imaginary, non-metric part of the distance between objects. If negative Eigenvalues are produced, we must correct for these imaginary distances.
To test if one or more groups is more variable than the others, ANOVA
of the distances to group centroids can be performed and parametric
theory used to interpret the significance of F. An alternative is to
use a permutation test. permDisper
permutes model residuals to
generate a permutation distribution of F under the Null hypothesis of
no difference in dispersion between groups.
The results of the analysis can be visualised using the plot
and boxplot
methods.
One additional use of these functions is in assessing beta diversity (Anderson et al 2006).
Anderson, M.J., Ellingsen, K.E. & McArdle, B.H. (2006) Multivariate dispersion as a measure of beta diversity. Ecology Letters 9(6), 683--693.
anova.lm
, scores
,
boxplot
data(varespec)
## Bray-Curtis distances between samples
dis <- vegdist(varespec)
## First 16 sites grazed, remaining 8 sites ungrazed
groups <- factor(c(rep(1,16), rep(2,8)), labels = c("grazed","ungrazed"))
## Calculate multivariate dispersions
mod <- betadisper(dis, groups)
mod
## Perform test
anova(mod)
## Permutation test for F
permDisper(mod)
## Plot the groups and distances to centroids on the
## first two PCoA axes
plot(mod)
## Draw a boxplot of the distances to centroid for each group
boxplot(mod)
Run the code above in your browser using DataLab