R/exp_dec.R

Defines functions exp_dec

Documented in exp_dec

exp_dec <-
function(thermal_units, chill_days, b, m) {
  y_pred <- b * exp(m * chill_days)
  if(thermal_units >= y_pred) {
    return(1)
  } else {
    return(0)
  }
}

Try the phenModel package in your browser

Any scripts or data that you put into this service are public.

phenModel documentation built on Aug. 2, 2019, 5:05 p.m.