powered by
spder(spectra, order = 2, p = 3, sw = 11)
data(spData) # Convert data frame to matrix spectra <- as.matrix(t(spData)) # Derivative spectra der <- spder(spectra=spectra, order=2, p=3, sw= 11)
Run the code above in your browser using DataLab