# NOT RUN {
spectra <- getSpectraInTimeExample()
defaults <- spectralIntegration( spectra , c(200 , 300) , timeUnit = "hours" )
unsmoothedTrend <- spectralIntegration( spectra , c(200 , 300) , timeUnit = "hours" )
smoothedTrend <- spectralIntegration( spectra , c(200 , 300) ,
smoothingValue = 0.5 , timeUnit = "hours" )
# }
Run the code above in your browser using DataCamp Workspace