powered by
spint(spectra, n = 1)
data(spData) # Convert data frame to matrix spectra <- as.matrix(t(spData)) # Interpolated spectra int <- spint(spectra=spectra, n=1)
Run the code above in your browser using DataLab