metadata | R Documentation |
retrieve dataset and column descriptions as well as the sources from reconstruction object
metadata(x)
x |
object of class tabs |
a list of data frames with a description of columns of vector datasets and the sources of the input datasets
Johannes De Groeve
# load data samples
sporades <- sporades()
topo <- sporades$topo
labs <- sporades$labs
correction <- sporades$correction
curve <- sporades$curve
# subset first and last period
curve <- curve[[c(1,dim(curve)[3])]]
# reconstruct
rec <- reconstruct(topo=topo,
region=labs,
curve=curve,
correction=correction,
reclabs='name'
)
# metadata
md <- metadata(rec)
# export
dir <- tempdir() # export to temporary directory
export(rec, paste0(dir,'/sporades.qs2'),overwrite=TRUE) # qs2 (faster and less storage than rds)
export(rec, paste0(dir,'/sporades.rds'), overwrite=TRUE) # rds / rdata
export(rec, paste0(dir,'/sporades'), overwrite=TRUE) # datasets organized in directory
#export(rec, paste0(dir,'/sporades.zip')) # zipped datasets
# import
rec <- import(filename=paste0(dir,'/sporades.qs2'))
rec <- import(filename=paste0(dir,'/sporades.rds'))
rec <- import(filename=paste0(dir,'/sporades'))
# explore
## tabs class object
if (interactive()){
explore(rec) # comparison present reference and topo-based
explore(rec, timelapse=3) # paleo reconstruction
}
## from exported object
if (interactive()){
explore(paste0(dir,'/sporades.qs2'))
explore(paste0(dir,'/sporades.qs2'), timelapse=1)
}
# get area
area <- get_area(rec) # using object class tabs
area <- get_area(rec$recvect) # using recvect
area <- get_area(paste0(dir,'/sporades.qs2')) # using exported object
unlink(dir)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.