sync {DendroSync} | R Documentation |
Calculate within- and between-group synchrony
Description
The function calculates spatial synchrony from a list
of fitted mixed models with variance-covariance structures of the type as produced by dendro.varcov
. Within- and between- varGroup
level synchrony are calculated, quantifying the degree to which the values of N chronologies contain a common temporal signal. Different models allow for the estimation of intraclass correlations either at the intragroup or intergroup level. The underlying idea is to split the mean correlation estimated between all possible pairs of chronologies drawn from the whole dataset into: (i) a mean correlation between pairs of chronologies for every group; and (ii) a mean correlation between pairs of chronologies for pairs of groups.
Usage
sync (modelList, modname = c("mBE", "mNE", "mCS", "mUN", "mHeNE",
"mHeCS", "mHeUN"), trend.mBE = FALSE)
Arguments
modelList |
a |
modname |
a |
trend.mBE |
a |
Details
The function calculates the within- and between-group synchrony. For the more general (unstructured) model, the correlation of pairs of chronologies i
and i*
belonging to group r
is:
rho(Wi,Wi*) = cov(Wi,Wi*)/sqrt(Var(Wi)*Var(Wi*)) = sigma^2yr/sigma^2yr+sigma^2e
Where Wi
is tree-ring width of i
th chronology, sigma^2yr
is a covariance between observations Wi
and Wi*
belonging to a group r
, sigma^2e
is a random deviation within the r
th group.
Conversely, the correlation of pairs of chronologies i
and i*
belonging to groups r
and r*
is:
rho(Wi,Wi*) = cov(Wi,Wi*)/sqrt(Var(Wi)*Var(Wi*)) =
sigma^2yr*/sqrt((sigma^2yr+sigma^2e)+(sigma^2yr*+sigma^2e))
Note that if no modname
is provided a warning message appears indicating that synchrony will be only calculated for the first modname
vector element, i.e. broad evaluation model (mBE).
Value
The function returns a list
containing the following components:
for within-group synchrony:
Modname |
a column indicating the variance-covariance mixed models fit type: |
mBE: null (or broad evaluation) structure.
mNE: homoscedastic variant of banded main diagonal (or narrow evaluation) structure.
mCS: homoscedastic variant of compound symmetry structure.
mUN: homoscedastic variant of unstructured (or full) structure.
mHeNE: heteroscedastic variant of banded main diagonal (or narrow evaluation) structure.
mHeCS: heteroscedastic variant of compound symmetry structure.
mHeUN: heteroscedastic variant of unstructured (or full) structure.
a_Group |
a column representing the within-group synchrony. |
SE_Group |
standard error of each observation. |
for between-group synchrony:
Modname |
a column indicating the model fit type. See previous desription. |
GroupName |
a column indicating between-group |
a_betw_Grp |
a column indicating between-group |
SE_betw_Grp |
standard error of each observation. |
Author(s)
Josu G. Alday, Tatiana A. Shestakova, Victor Resco de Dios, Jordi Voltas
References
Shestakova, T.A., Aguilera, M., Ferrio, J.P., Gutierrez, E. & Voltas, J. (2014). Unravelling spatiotemporal tree-ring signals in Mediterranean oaks: a variance-covariance modelling approach of carbon and oxygen isotope ratios. Tree Physiology 34: 819-838.
Shestakova, T.A., Gutierrez, E., Kirdyanov, A.V., Camarero, J.J., Genova, M., Knorre, A.A., Linares, J.C., Resco de Dios, V., Sanchez-Salguero, R. & Voltas, J. (2016). Forests synchronize their growth in contrasting Eurasian regions in response to climate warming. Proceedings of the National Academy of Sciences of the United States of America 113: 662-667.
See Also
dendro.varcov
for models details.
Examples
## Calculate synchrony for null.model (broad evaluation, mBE) and homoscedastic variant
# of unstructured model (or full, mUN) for conifersIP data,
# and heteroscedastic variant for 1970-1999 period.
data(conifersIP)
##Fit the homoscedastic set of varcov models (mBE, mNE, mCS, mUN)
#using taxonomic grouping criteria (i.e. Species)
ModHm <- dendro.varcov(TRW ~ Code, varTime = "Year", varGroup = "Species",
data = conifersIP, homoscedastic = TRUE)
summary(ModHm)# Class and length of list elements
#Synchrony for mBE and mUN models
sync(ModHm, modname = "mBE")
sync(ModHm, modname = "mUN")
##Chop the data from 1970 to 1999.
conif.30 <- conifersIP[conifersIP$Year>1969 & conifersIP$Year<2000,]
summary(conif.30$Year)
#Fit the heteroscedastic set of variance covariance mixed models (mBE, mHeNE, mHeCS, mHeUN)
# using taxonomic grouping criteria (ie. Species)
ModHt30 <- dendro.varcov(TRW ~ Code, varTime = "Year", varGroup = "Species",
data = conif.30, homoscedastic = FALSE)
sync(ModHt30, modname = "mBE")
sync(ModHt30, modname = "mHeUN")