R/TSP.list.R

In embryogrowth: Tools to Analyze the Thermal Reaction Norm of Embryo Growth

#' Database of thermosensitive period of development for sex determination
#' @title Database of thermosensitive period of development for sex determination
#' @author Marc Girondot \email{marc.girondot@@universite-paris-saclay.fr}
#' @docType data
#' @name TSP.list
#' @description Database of thermosensitive period of development for sex determination.\cr
#' This database can be used with the functions plot() or info.nests().\cr
#' The attributes TSP.begin.stages and TSP.end.stages for each dataframe give 
#' respectively the first and the last stages for TSP. Then the metrics for the limits of TSP 
#' are the average sizes before and after the TSP (see example, below).\cr
#' If the metric for the stages before the TSP or after the TSP is not known, it will use the 
#' available information.
#' @references Mrosovsky, N., Pieau, C., 1991. Transitional range of temperature, pivotal 
#' temperatures and thermosensitive stages for sex determination in reptiles. 
#' Amphibia-Reptilia 12, 169-179.
#' @keywords datasets
#' @family Functions for temperature-dependent sex determination
#' @usage TSP.list
#' @examples
#' \dontrun{
#' library(embryogrowth)
#' data(TSP.list)
#' names(TSP.list)
#' reference <- "Emys_orbicularis.mass"
#' metric <- TSP.list[[reference]]
#' TSP.begin <- attributes(TSP.list[[reference]])$TSP.begin.stages
#' TSP.end <- attributes(TSP.list[[reference]])$TSP.end.stages
#' # Metric at the beginning of the TSP
#' del <- ifelse(all(metric$stages == TSP.begin - 1)==FALSE, 0, 1)
#' (metric$metric[metric$stages == TSP.begin - del] +
#'     metric$metric[metric$stages == TSP.begin]) / 2
#' # Metric at the end of the TSP
#' del <- ifelse(all(metric$stages == TSP.begin + 1)==FALSE, 0, 1)
#' (metric$metric[metric$stages == TSP.end] +
#'         metric$metric[metric$stages == del + TSP.end]) / 2
#' }
#' @format A list with dataframes including attributes
NULL