Floral induction model by Chen et al. 2017 (Journal of Ecology)
DU(par, data)
a vector of parameter values, this is functions specific
input data (see reference for detailed description), data should be formatted using flat_format()
raster or vector with estimated phenophase timing (in DOY)
if (FALSE) {
estimate <- DU(data = data, par = par)
}