rare_beta | R Documentation |
The function calculates spatial and non-spatially explicit rarefaction curves using different indexes of species beta diversity.
rare_beta(comm,dist_xy=NULL,method=c("whittaker","jaccard","bray","cody"
,"fun_div"),random=99,fun_div=NULL,args=NULL,verbose=FALSE,spatial=FALSE)
comm |
a community dataframe or matrix with N plots as rows, S species as columns. Both the presence/absence (1/0) or the abundances of species in plots are allowed as entries. Plot names should be provided as row names. |
dist_xy |
an object of class |
method |
the diversity index for the calculation of the rarefaction curve, one among "whittaker","jaccard","bray","cody" (only for spatially-explicit rarefaction) or "fun_div". See details. |
random |
number of iterations to construct the non-spatially explicit rarefaction curve |
fun_div |
a string with the name of the function you want to use to calculate the rarefaction. The function must calculate the value of the chosen index per plot and return a pairwise distance matrix with the values. |
args |
a list with the arguments for fun_div. The value |
verbose |
if TRUE, the arguments of |
spatial |
if TRUE, the function calculates the spatially-explicit rarefaction. |
The available methods are:
whittaker
: Whittaker's species turnover calculates how many times there is a change in species composition among the plots:
\beta_w=\gamma/\alpha -1
where \gamma
is the species richness over all plots compared and \alpha
the average species richness within a single plot.
jaccard
: Jaccard dissimilarity coefficient is a pairwise measure of dissimilarity between plots:
\beta_j=a/(\alpha_1+\alpha_2-a)
where a
is the number of species in common between two plots, and \alpha_1
and \alpha_2
are the values of alpha diversity (species richness) of the 2 plots compared. The rarefaction curve is calculated with the mean of the pairwise diversities in N random plots.
bray
: Bray-Curtis dissimilarity is a pairwise measure of similarity between plots weighted by the abundances of the species:
\beta_{bray}=\frac{\sum_{i} \left | x_i - x_j \right |}{\sum_{i} x_i+x_j}
where x_i
and x_j
are the abundances of the species x
in the plots i
and j
.
cody
: Cody index is defined as the rate at which species are being replaced in censuses at each point on the habitat gradient and is fixed for samples arranged along gradients of environmental change:
\beta_c=[g(H)+l(H)]/2
where g(H)
is the number of species gained along the habitat gradient H
and l(H)
is the number of species lost.
In some cases, the rarefaction doesn't behave like a non-decreasing function of plot number N. This behavior is typical of non-concave indexes.
An object of class data.frame
with 3 columns is returned:
- Rarefaction: : mean of the values of the accumulation curves for all the sampling dimensions;
- IC_up: upper confidence interval;
- IC_low: lower confidence interval.
Elisa Thouverai elisa.th95@gmail.com
Enrico Tordoni etordoni@units.it
with contributions of Sandrine Pavoine.
Baselga, A. (2013) Multiple site dissimilarity quantifies compositional heterogeneity among several sites, while average pairwise dissimilarity may be misleading. Ecography, 36, 124–128.
Koleff, P., Gaston, K.J., Lennon, J.J. (2003) Measuring beta diversity for presence-absence data. Journal of Animal Ecology, 72, 367–382.
Wilson, M.V., Shmida, A. (1984) Measuring Beta Diversity with Presence-Absence Data. Journal of Ecology, 72, 1055–1064.
## Not run:
#Time consuming
data(duneFVG)
data(duneFVG.xy)
dist_sp<-dist(duneFVG.xy$tot.xy,'euclidean')
## Spatial explicit rarefaction
## Take care that the following scripts may be a bit time-consuming
## depending on your computer (less than a minute to a few minutes)
rare<-rare_beta(duneFVG$total,dist_sp,method="bray",spatial=TRUE)
rare1<-rare_beta(duneFVG$total,method="bray",random=99)
plot(rare [,1], ylab="Rao QE", xlab="Number of plots", type="l", ylim=range(rare, na.rm
=TRUE))
lines(rare[,2], lty=2)
lines(rare[,3], lty=2)
plot(rare1 [,1], ylab="Rao QE", xlab="Number of plots", type="l", ylim=range(rare, na.rm
=TRUE))
lines(rare1[,2], lty=2)
lines(rare1[,3], lty=2)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.