Работа с количественными временными рядами
Проанализируем изменения в температуре в какой-либо местности.
In[1]:=
![Click for copyable input](assets.ru/working-with-quantity-valued-time-series/In_91.png)
data = WeatherData[
Entity["City", {"Champaign", "Illinois", "UnitedStates"}],
"Temperature", {{2016, 3, 20}, {2016, 3, 22}}];
In[2]:=
![Click for copyable input](assets.ru/working-with-quantity-valued-time-series/In_92.png)
temps = TimeSeries[data, MissingDataMethod -> "Interpolation"]
Out[2]=
![](assets.ru/working-with-quantity-valued-time-series/O_64.png)
Визуализируем временной ряд температурных значений.
In[3]:=
![Click for copyable input](assets.ru/working-with-quantity-valued-time-series/In_93.png)
DateListPlot[temps, PlotTheme -> "Detailed"]
Out[3]=
![](assets.ru/working-with-quantity-valued-time-series/O_65.png)
Oтобразим основные свойства временного ряда.
In[4]:=
![Click for copyable input](assets.ru/working-with-quantity-valued-time-series/In_94.png)
stats = {Min, Max, Mean, Median, StandardDeviation};
TableForm[{Map[#[temps] &, stats]}, TableHeadings -> {None, stats}]
Out[4]//TableForm=
![](assets.ru/working-with-quantity-valued-time-series/O_66.png)
Выразим температурные показатели по шкале Фаренгейтa.
In[5]:=
![Click for copyable input](assets.ru/working-with-quantity-valued-time-series/In_95.png)
tempsF = UnitConvert[temps, "DegreesFahrenheit"];
TableForm[{Map[#[tempsF] &, stats]}, TableHeadings -> {None, stats}]
Out[5]//TableForm=
![](assets.ru/working-with-quantity-valued-time-series/O_67.png)
Рассчитаем среднее 6-ти часовое значение температуры.
In[6]:=
![Click for copyable input](assets.ru/working-with-quantity-valued-time-series/In_96.png)
avg = MovingMap[Mean, temps, {Quantity[6, "Hours"], Center}]
Out[6]=
![](assets.ru/working-with-quantity-valued-time-series/O_68.png)
код на языке Wolfram Language целиком
Out[7]=
![](assets.ru/working-with-quantity-valued-time-series/O_69.png)