as defined by Xin et al. 2015 (Rem. Sens. Env.)
SGSI(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)
No clear accumulation start date was set in the above mentioned manuscript, as such we assume a start date of 21th of Dec, or 1th of Jan. depending on the offset used in the generated validation data.
if (FALSE) {
estimate <- AGSI(data = data, par = par)
}