Tendências e sazonalidades

O número de passageiros das companhias aéreas entre 1949 e 1960 aumentou mas também variou de acordo com temporadas. Use MovingMap com Total sobre janelas anuais não sobrepostas para visualizar o crescimento anual. Use DateHistogram para dados mensais com redução de datas anuais para estudar dependências sazonais.

O número de passageiros das companhias aéreas internacionais por mês nos anos de 1949 a 1960 está disponível em ExampleData.

In[1]:=

data = ExampleData[{"Statistics", "InternationalAirlinePassengers"}, "TimeSeries"]

Out[1]=

Os dados apresentam tanto um tendência crescente a longo prazo como oscilações sazonais.

In[2]:=

DateListPlot[data, PlotTheme -> "Detailed"]

Out[2]=

Acumule anualmente para ver a tendência global. Coloque os resultados acumulados no último dia de cada ano para criar janelas móveis de 1 ano sem sobreposição.

In[3]:=

positionspec = {{1949, 12, 31}, {1960, 12, 31}, Quantity[1, "Year"]};

In[4]:=

mm = MovingMap[Total, data, {Quantity[1, "Years"], Right, positionspec}];

In[5]:=

DateListPlot[mm, PlotMarkers -> Automatic, GridLines -> {mm["Dates"], None}]

Out[5]=

Analise dependências sazonais. Crie WeightedData com o número de passageiros como ponderações para as datas.

In[6]:=

wd = WeightedData[data["Dates"], data["Values"]];

DateHistogram acumula as ponderações de cada mês durante os anos conforme especificado em DateReduction.

In[7]:=

DateHistogram[wd, "Month", DateReduction -> "Year"]

Out[7]=