最高気温と最低気温

新関数のMinMaxを使うと，リストの最大値と最小値を同時に取り出すことができる．

ヤクーツク市の15年間の気温データ集合を生成する．

In[1]:=

data = AirTemperatureData[ Entity["City", {"Yakutsk", "Yakutia", "Russia"}], {{2001, 01}, {2015, 12}, "Month"}]

Out[1]=

結果の時系列はDateListPlotを使って可視化することができる．

In[2]:=

DateListPlot[data, FrameLabel -> Automatic]

Out[2]=

以下は，15年間における最高気温と最低気温である．

In[3]:=

periodextrema = MinMax[data]

Out[3]=

次は，各年の最高気温と最低気温を与える．

In[4]:=

yearextrema = MovingMap[MinMax, data, {Quantity[1, "Years"], Right, Quantity[1, "Years"]}]

Out[4]=

最初の年の極値を取り出す．

In[5]:=

yearextrema["FirstValue"]

Out[5]=

15年間の変化をプロットする．

In[6]:=

DateListPlot[yearextrema, PlotMarkers -> Automatic]

Out[6]=