Nothing
#' Creation of a template for \link{use_DRAC4brick} input.
#'
#' This function generates a template that can be fill in and use with \link{use_DRAC4brick}.
#'
#' @author David Strebler
#'
#' @export template_DRAC4brick
template_DRAC4brick <- function(
){
info <- list(project = NULL,
sample = NULL,
date = NULL,
mineral = NULL,
conversion.factors = NULL,
alpha.size.attenuation = NULL,
beta.size.attenuation = NULL,
beta.etch.attenuation = NULL)
De <- list(De = NULL,
De.err = NULL)
grain.Dr <- list(U = NULL,
U.err = NULL,
Th = NULL,
Th.err = NULL,
K = NULL,
K.err = NULL,
Rb = NULL,
Rb.err = NULL,
K2Rb = NULL,
alpha = NULL,
alpha.err = NULL,
beta = NULL,
beta.err = NULL,
gamma = NULL,
gamma.err = NULL)
grain.info <- list(grain.size.min = NULL,
grain.size.max = NULL,
grain.etch.min = NULL,
grain.etch.max = NULL,
a.value = NULL,
a.value.err = NULL)
grain <- list(Dr = grain.Dr,
info = grain.info)
brick.Dr <- list(U = NULL,
U.err = NULL,
Th = NULL,
Th.err = NULL,
K = NULL,
K.err = NULL,
Rb = NULL,
Rb.err = NULL,
K2Rb = NULL,
alpha = NULL,
alpha.err = NULL,
beta = NULL,
beta.err = NULL,
gamma = NULL,
gamma.err = NULL)
brick.info <- list(water.content = NULL,
water.content.err =NULL,
density = NULL,
density.err = NULL,
scale4shallow.depth = FALSE)
brick <- list(Dr = brick.Dr,
info = brick.info)
mortar.Dr <- list(U = NULL,
U.err = NULL,
Th = NULL,
Th.err = NULL,
K = NULL,
K.err = NULL,
Rb = NULL,
Rb.err = NULL,
K2Rb = NULL,
alpha = NULL,
alpha.err = NULL,
beta = NULL,
beta.err = NULL,
gamma = NULL,
gamma.err = NULL)
mortar.info <- list(water.content = NULL,
water.content.err = NULL,
density = NULL,
density.err = NULL,
ratio = NULL,
ratio.err = NULL)
mortar <- list(Dr = mortar.Dr,
info = mortar.info)
cosmic.Dr <- list(depth = NULL,
depth.err = NULL,
latitude = NULL,
longitude = NULL,
altitude = NULL,
Dr = NULL,
Dr.err = NULL,
corr.fieldChanges = FALSE)
template <- list(info=info,
De = De,
grain= grain,
brick = brick,
mortar = mortar,
cosmic = cosmic.Dr)
class(template) <- c("DRAC4brick.list","list")
return(template)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.