adapted from propsectr function https://github.com/l-ramirez-lopez/prospectr/blob/main/R/continuumRemoval.R

crfun(x, wav, interpol)

Arguments

x

numeric. original spectrum

wav

numeric. central wavelength for the spectral bands

interpol

character. linear or spline

Value

continuum removed spectrum