Description Usage Arguments Value Note Examples
Get yearly vegetation phenological metrics of a curve fitting method
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
fits |
A list of |
method |
Which fine curve fitting method to be extracted? |
TRS |
Threshold for |
analytical |
If true, |
smoothed.spline |
Whether apply |
IsPlot |
Boolean. Whether to plot figure? |
show_title |
Whether to show the name of fine curve fitting method in top title? |
... |
ignored. |
fFITs |
|
title_left |
String of growing season flag. |
showName_pheno |
Whether to show phenological methods names in the top panel? |
List of every year phenology metrics
Please note that only a single fine curve fitting method allowed here!
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | library(phenofit)
# simulate vegetation time-series
fFUN = doubleLog.Beck
par = c( mn = 0.1, mx = 0.7, sos = 50, rsp = 0.1, eos = 250, rau = 0.1)
t <- seq(1, 365, 8)
tout <- seq(1, 365, 1)
y <- fFUN(par, t)
methods <- c("AG", "Beck", "Elmore", "Gu", "Zhang") # "Klos" too slow
fFITs <- curvefit(y, t, tout, methods)
# multiple years
fits <- list(`2001` = fFITs, `2002` = fFITs)
l_param <- get_param(fits)
d_GOF <- get_GOF(fits)
d_fitting <- get_fitting(fits)
l_pheno <- get_pheno(fits, "AG", IsPlot=TRUE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.