# Message Boards

Posted 10 months ago
1655 Views
|
3 Replies
|
0 Total Likes
|
 Hi, Now I would like to calculate the value of spectral exponent for my data in the attached notebook. Thank you for your help. data0 = WeatherData["KDRA", "Temperature", {{1979, 1, 1}, {2020, 12, 31}, "Day"}]; regularData = TimeSeriesResample[data0, ResamplingMethod -> {"Interpolation", InterpolationOrder -> 1}]; data = QuantityMagnitude[regularData["Values"]]; Periodogram[data] 
3 Replies
Sort By:
Posted 10 months ago
 You can have somme information in my web site about the treatment of temporel datashttps://dauphinester.wixsite.com/monsite/dossiermathematica
 You can use PeridogramArray, then take the first half of the resulting series. Remove the first two or three values from this series. And make an adjustment to this last series. Try this program : data1 = Take[PeriodogramArray[data], (Length[data]/2)] data2 = Drop[data1, 2] model = LinearModelFit[data2, x, x] mo = Normal[model] pente = mo[[2, 1]] You can also read my book Fractal Geography