write.tridas | R Documentation |
This function writes measured or derived (standardized, averaged) series of values to a TRiDaS format file. Some metadata are also supported.
write.tridas(rwl.df = NULL, fname, crn = NULL, prec = NULL, ids = NULL,
titles = NULL, crn.types = NULL, crn.titles = NULL,
crn.units = NULL, tridas.measuring.method = NA,
other.measuring.method = "unknown", sample.type = "core",
wood.completeness = NULL, taxon = "",
tridas.variable = "ring width", other.variable = NA,
project.info = list(type = c("unknown"), description = NULL,
title = "", category = "", investigator = "",
period = ""),
lab.info = data.frame(name = "", acronym = NA, identifier = NA,
domain = "", addressLine1 = NA,
addressLine2 = NA, cityOrTown = NA,
stateProvinceRegion = NA, postalCode = NA,
country = NA),
research.info = data.frame(identifier = NULL, domain = NULL,
description = NULL),
site.info = list(type = "unknown", description = NULL, title = ""),
random.identifiers = FALSE, identifier.domain = lab.info$name[1],
...)
rwl.df |
|
fname |
|
crn |
|
prec |
optional |
ids |
optional data.frame(tree=1:n.col, core=rep(1,n.col), radius=rep(1,n.col), measurement=rep(1,n.col)) where |
titles |
optional |
crn.types |
|
crn.titles |
optional |
crn.units |
optional |
tridas.measuring.method |
|
other.measuring.method |
|
sample.type |
optional |
wood.completeness |
optional
|
taxon |
|
tridas.variable |
|
other.variable |
|
project.info |
|
lab.info |
|
research.info |
optional
|
site.info |
|
random.identifiers |
|
identifier.domain |
|
... |
Unknown arguments are accepted but not used. |
The Tree Ring Data Standard (TRiDaS) is described in Jansma et. al (2010).
fname
This is an early version of the function. Bugs are likely to exist, and parameters are subject to change.
Mikko Korpela
Jansma, E., Brewer, P. W., and Zandhuis, I. (2010) TRiDaS 1.1: The tree-ring data standard. Dendrochronologia, 28(2), 99–130.
write.rwl
, write.tucson
,
write.compact
, write.crn
,
read.tridas
library(utils)
## Not run:
## Write raw ring widths
data(co021)
fname1 <- write.tridas(rwl.df = co021,
fname = tempfile(fileext=".xml"), prec = 0.01,
site.info = list(title = "Schulman old tree no. 1, Mesa Verde",
type = "unknown"),
taxon = "Pseudotsuga menziesii var. menziesii (Mirb.) Franco",
project.info = list(investigator = "E. Schulman",
title = "", category = "",
period = "", type = "unknown"))
print(fname1) # tempfile used for output
## Write mean value chronology of detrended ring widths
data(ca533)
ca533.rwi <- detrend(rwl = ca533, method = "ModNegExp")
ca533.crn <- chron(ca533.rwi, prewhiten = TRUE)
fname2 <- write.tridas(crn = ca533.crn,
fname = tempfile(fileext=".xml"),
taxon = "Pinus longaeva D.K. Bailey",
project.info =
list(investigator = "Donald A. Graybill, V.C. LaMarche, Jr.",
title = "Campito Mountain", category = "",
period = "", type = "unknown"))
print(fname2) # tempfile used for output
unlink(c(fname1, fname2)) # remove the files
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.