powered by
sptrun(spectra, limInf, limSup)
data(spData) # Convert data frame to matrix spectra <- as.matrix(t(spData)) # Truncated trn <- sptrun(spectra=spectra, limInf=800, limSup=2000)
Run the code above in your browser using DataLab