A function to extract thresholds
See PhenoDeriv from package greenbrown
PhenoDeriv(x, formula = NULL, uncert = FALSE, params = NULL, breaks, ...)
x |
A named vector with the parameters of the equation used to fit the data. |
formula |
Inherited from previous steps of the process. |
uncert |
Currently unused |
params |
Inherited from previous steps of the process. |
breaks |
Currently unused |
... |
Further arguments, currently not used |
## Not run: data(bartlett2009.fitted) derivatives.phenophases <- PhenoDeriv( x=bartlett2009.fitted$fit$predicted, fit=bartlett2009.fitted$fit ) plot(bartlett2009.fitted$fit$predicted) abline(v=derivatives.phenophases[c(1:2,4)], col=palette()) mtext(names(derivatives.phenophases[c(1:2,4)]), at=derivatives.phenophases[c(1:2,4)], line=-2, col=palette()[1:3]) ## End(Not run)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.