气温高低
用全新函数 MinMax、可以同时提取列表的最高和最低值.
生成雅库茨克 15 年的气温数据集.
In[1]:=
![Click for copyable input](assets.zh/temperature-minmax/In_1.png)
data = AirTemperatureData[
Entity["City", {"Yakutsk", "Yakutia", "Russia"}], {{2001,
01}, {2015, 12}, "Month"}]
Out[1]=
![](assets.zh/temperature-minmax/O_1.png)
用 DateListPlot 可视化此结果的时间序列.
In[2]:=
![Click for copyable input](assets.zh/temperature-minmax/In_2.png)
DateListPlot[data, FrameLabel -> Automatic]
Out[2]=
![](assets.zh/temperature-minmax/O_2.png)
以下为 15 年的最高和最低气温.
In[3]:=
![Click for copyable input](assets.zh/temperature-minmax/In_3.png)
periodextrema = MinMax[data]
Out[3]=
![](assets.zh/temperature-minmax/O_3.png)
以下给出每年的最高和最低气温.
In[4]:=
![Click for copyable input](assets.zh/temperature-minmax/In_4.png)
yearextrema =
MovingMap[MinMax,
data, {Quantity[1, "Years"], Right, Quantity[1, "Years"]}]
Out[4]=
![](assets.zh/temperature-minmax/O_4.png)
提取第一年的极值.
In[5]:=
![Click for copyable input](assets.zh/temperature-minmax/In_5.png)
yearextrema["FirstValue"]
Out[5]=
![](assets.zh/temperature-minmax/O_5.png)
绘制 15 年的变化图.
In[6]:=
![Click for copyable input](assets.zh/temperature-minmax/In_6.png)
DateListPlot[yearextrema, PlotMarkers -> Automatic]
Out[6]=
![](assets.zh/temperature-minmax/O_6.png)