R/rel_acclimatized.r

In alfcrisci/rBiometeo: Biometeorological Functions in R

#' rel_acclimatized
#'
#' Calculate treshshold of risk realated to wbgt index for acclimatized people
#'
#' @param met numeric Metabolic rate in Watt following level of ISO FDIS 7243.#
#' @return REL
#'
#' @author Istituto per la Bioeconomia CNR Firenze Italy  Alfonso Crisci \email{alfonso.crisci@@ibe.cnr.it}
#' @references  Ergonomics of the thermal environment – Assessment of heat stress using the WBGT (wet bulb globe temperature)   index, ISO FDIS 7243 (2016)
#' @keywords  REL
#' @export
#'
#'
#'
#'

rel_acclimatized=function(met)  {
  ct$assign("met", as.array(met))
  ct$eval("var res=[]; for(var i=0, len=met.length; i < len; i++){ res[i]=rel_acclimatized(met[i])};")
  res=ct$get("res")
  return(res)
}