designdist(x, method = "(A+B-2*J)/(A+B)",
terms = c("binary", "quadratic", "minimum"),
abcd = FALSE, name)
J
for shared quantity, A
and B
for totals,
N
for the number of rows (sites) and P
for the number of
columns (species). The ex
and y
the "quadratic"
terms are J = sum(x*y)
,
A = sum(x^2)
, B = sum(y^2)
, and "minimum"
terms
method
equation and terms
argument.designdist
returns an object of class dist
.J
, A
and B
, and some also involve
matrix dimensions N
and P
. Some examples you can define in
designdist
are:
A+B-2*J
"quadratic"
squared Euclidean
A+B-2*J
"minimum"
Manhattan
(A+B-2*J)/(A+B)
"minimum"
Bray-Curtis
(A+B-2*J)/(A+B)
"binary"
(A+B-2*J)/(A+B-J)
"binary"
Jaccard
(A+B-2*J)/(A+B-J)
"minimum"
(A+B-2*J)/(A+B-J)
"quadratic"
(dis)similarity ratio
1-J/sqrt(A*B)
"binary"
Ochiai
1-J/sqrt(A*B)
"quadratic"
cosine
complement
1-phyper(J-1, A, P-A, B)
"binary"
Raup-Crick
} The function designdist
can implement most dissimilarity
indices in vegdist
or elsewhere, and it can also be
used to implement many other indices, amongst them, most of those
described in Legendre & Legendre (1998). It can also be used to
implement all indices of beta diversity described in Koleff et
al. (2003), but there also is a specific function
betadiver
for the purpose.
If you want to implement binary dissimilarities based on the 2x2
contingency table notation, you can set abcd = TRUE
. In this
notation a = J
, b = A-J
, c = B-J
, d =
P-A-B+J
. This notation is often used instead fo the more more
tangible default notation for reasons that are opaque to me.
vegdist
, betadiver
, dist
.## Arrhenius dissimilarity: the value of z in the species-area model
## S = c*A^z when combining two sites of equal areas, where S is the
## number of species, A is the area, and c and z are model parameters.
## The A below is not the area (which cancels out), but number of
## species in one of the sites, as defined in designdist().
data(BCI)
dis <- designdist(BCI, "(log(A+B-J)-log(A+B)+log(2))/log(2)")
## This can be used in clustering or ordination...
ordiplot(cmdscale(dis))
## ... or in analysing beta diversity (without gradients)
summary(dis)
Run the code above in your browser using DataLab