View source: R/mastifFunctions.R
| mastClimate | R Documentation |
Annotates treeData for mastif to include covariates.
mastClimate( file, plots, years, months = 1:12, FUN = 'mean',
vname = '', normYr = c( 1990:2020 ), lastYear = 2021 )
file |
|
plots |
|
years |
|
months |
|
FUN |
|
vname |
name to use for a variable in the model that comes from |
normYr |
years for climate norm for calculating anomalies. |
lastYear |
last data year to include. |
The version of treeData used in mastif can have additional tree years included when there are seed trap years that were not censused or when AR(p) effects extend observations to impute the p years before and after a tree was observed. The function mastFillCensus makes this version of treeData available to the user. The function mastClimate provides a quick way to add plot-year covariates to treeData.
A covariate like minimum monthly temperature is stored in a plot by year_month format, where rownames of file are plot names matching treeData$plot, and colnames of file could be 2012_1, 2012_2, ... for the 12 months in the year. The numeric vector months holds the months to be included in the annual values, e.g., c(3, 4) for minimum winter temperatures during the period from March through April. To find the minimum for this period, set FUN to 'min'.
More detailed vignettes can be obtained with: browseVignettes('mastif')
A numeric vector equal in length to the number of rows in treeData that can be added as a column and included in formulaFec.
James S Clark, jimclark@duke.edu
Clark, J.S., C. Nunes, and B. Tomasek. 2019. Foodwebs based on unreliable foundations: spatio-temporal masting merged with consumer movement, storage, and diet. Ecological Monographs, e01381.
mastFillCensus to fill tree census
mastif for analysis
A more detailed vignette is can be obtained with:
browseVignettes('mastif')
website 'http://sites.nicholas.duke.edu/clarklab/code/'.
d <- "https://github.com/jimclarkatduke/mast/blob/master/liriodendronExample.rData?raw=True"
repmis::source_data(d)
inputs <- list( specNames = specNames, seedNames = seedNames,
treeData = treeData, seedData = seedData,
xytree = xytree, xytrap = xytrap)
# interpolate census, add years for AR(p) model
inputs <- mastFillCensus(inputs, p = 3)
treeData <- inputs$treeData #now includes additional years
# include minimum spring temperature of previous year
cfile <- tempfile(fileext = '.csv')
d <- "https://github.com/jimclarkatduke/mast/blob/master/tmin.csv?raw=True"
download.file(d, destfile=cfile)
tyears <- treeData$year - 1
tplots <- treeData$plot
tmp <- mastClimate( file = cfile, plots = tplots,
years = tyears, months = 1:4, FUN = 'min')
treeData$tminSprAnomaly <- tmp$x[,3]
inputs$treeData <- treeData
formulaRep <- as.formula( ~ diam )
formulaFec <- as.formula( ~ diam + tminSprAnomaly )
inputs$yearEffect <- list(groups ='species', p = 3) # AR(3) model, species are lag groups
output <- mastif(inputs = inputs, formulaFec, formulaRep, ng = 1000, burnin = 400)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.