Fine curve fitting

Curve fit vegetation index (VI) time-series of every growing season using fine curve fitting methods.

curvefit(
  y,
  t = index(y),
  tout = t,
  methods = c("AG", "Beck", "Elmore", "Gu", "Klos", "Zhang"),
  ...
)

Arguments

y	Vegetation time-series index, numeric vector
t	The corresponding doy of x
tout	The output interpolated time.
methods	Fine curve fitting methods, can be one or more of c('AG', 'Beck', 'Elmore', 'Gu', 'Klos', 'Zhang').
...	other parameters passed to curve fitting function.

Value

fFITs S3 object, see fFITs() for details.

Note

'Klos' have too many parameters. It will be slow and not stable.

See also

fFITs(), FitDL.AG(), FitDL.Beck(), FitDL.Elmore(), FitDL.Gu(), FitDL.Klos(), FitDL.Zhang()

Examples

library(phenofit)
#> Error in library(phenofit): there is no package called ‘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)
#> [doubleLog.AG]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.AG]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Beck]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Beck]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Elmore]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Elmore]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Gu]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Gu]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Zhang]: object '_phenofit_rcpp_wTSM' not found
#> [doubleLog.Zhang]: object '_phenofit_rcpp_wTSM' not found