R/functions_Juveniles.R

Defines functions juveniles_GrowthRateWW juveniles_GrowthRateTL

Documented in juveniles_GrowthRateTL juveniles_GrowthRateWW

#'
#' @title Calculate growth rate (mm/day TL) for juvenile larvae
#'
#' @description Function to calculate growth rate (mm/day SL) for juvenile larvae.
#'
#' @param T - temperature (deg C)
#'
#' @return vector of growth rates
#'
#' @details From Hurst et al., 2010. Valid range is 3-11 deg C.
#'
#' @export
#'
juveniles_GrowthRateTL<-function(T){
  gL <- -0.081 + (0.079*T) - (0.003*T^2);#--Hurst et al 2010, juvenile eq, mm per day
  return(gL);
}

#'
#' @title Calculate growth rate (1/day wet weight) for juvenile larvae
#'
#' @description Function to calculate growth rate (1/day wet weight) for juvenile larvae.
#'
#' @param T - temperature (deg C)
#'
#' @return vector of growth rates
#'
#' @details From Hurst et al., 2010. Valid range is 2-12 deg C.
#'
#' @export
#'
juveniles_GrowthRateWW<-function(T){
  gM <- (-0.998 + 0.579*T - 0.022*T^2)/100;#--Hurst et al 2010, juvenile eq, growth per day wet weight (orig. eq. in %/d)
  return(gM);
}
wStockhausen/rPacificCod documentation built on March 25, 2021, 2:39 p.m.