O pacote ou biblioteca de dados de séries temporais (TSDL) foi criada por Rob Hyndman, Professor de Estatística da Monash University, Austrália. Inclui dados de muitos livros didáticos de séries temporais, bem como muitas outras séries que ele coletou para projetos de alunos ou pessoas úteis que lhe enviaram.

Pode ser acessada em https://pkg.yangzhuoranyang.com/tsdl/articles/tsdl.html e instalada no R desde a GitHub, uma plataforma de hospedagem de código-fonte e arquivos com controle de versão usando o Git. Permite que programadores, utilitários ou qualquer usuário cadastrado na plataforma contribuam em projetos privados e/ou Open Source de qualquer lugar do mundo.

Instalação

#install.packages("devtools")
#devtools::install_github("FinYang/tsdl")

Uso

tsdl é uma lista de 648 séries de classe tsdl. Cada série dentro de tsdl é da classe ts. 

library(tsdl)
tsdl
## Time Series Data Library: 648 time series  
## 
##                        Frequency
## Subject                 0.1 0.25   1   4   5   6  12  13  52 365 Total
##   Agriculture             0    0  37   0   0   0   3   0   0   0    40
##   Chemistry               0    0   8   0   0   0   0   0   0   0     8
##   Computing               0    0   6   0   0   0   0   0   0   0     6
##   Crime                   0    0   1   0   0   0   2   1   0   0     4
##   Demography              1    0   9   2   0   0   3   0   0   2    17
##   Ecology                 0    0  23   0   0   0   0   0   0   0    23
##   Finance                 0    0  23   5   0   0  20   0   2   1    51
##   Health                  0    0   8   0   0   0   6   0   1   0    15
##   Hydrology               0    0  42   0   0   0  78   1   0   6   127
##   Industry                0    0   9   0   0   0   2   0   1   0    12
##   Labour market           0    0   3   4   0   0  17   0   0   0    24
##   Macroeconomic           0    0  18  33   0   0   5   0   0   0    56
##   Meteorology             0    0  18   0   0   0  17   0   0  12    47
##   Microeconomic           0    0  27   1   0   0   7   0   1   0    36
##   Miscellaneous           0    0   4   0   1   1   3   0   1   0    10
##   Physics                 0    0  12   0   0   0   4   0   0   0    16
##   Production              0    0   4  14   0   0  28   1   1   0    48
##   Sales                   0    0  10   3   0   0  24   0   9   0    46
##   Sport                   0    1   1   0   0   0   0   0   0   0     2
##   Transport and tourism   0    0   1   1   0   0  12   0   0   0    14
##   Tree-rings              0    0  34   0   0   0   1   0   0   0    35
##   Utilities               0    0   2   1   0   0   8   0   0   0    11
##   Total                   1    1 300  64   1   1 240   3  16  21   648

Para extrair séries com características específicas, pode-se usar a função subset. A maneira mais comum de extrair séries é especificar a frequência ou o assunto (tipo) da série. A posição dessas duas condições definidas são intercambiáveis. 

industria = subset(tsdl,12,"Industry")
attributes(industria[[2]])
## $tsp
## [1] 1976.000 1991.583   12.000
## 
## $class
## [1] "ts"
## 
## $source
## [1] "Hipel and McLeod (1994)"
## 
## $description
## [1] "Motor vehicles engines and parts/CPI, Canada, 1976-1991"
## 
## $subject
## [1] "Industry"

Dados

par(mfrow=c(1,1), mar = c(4,5,3,1), pch=19)
plot(industria[[2]], type="b", xlab="", ylab="", main="Demanda mensal de peças de reparo \n equipamentos grandes/pesados. Canada 1976 – 1991")
grid()

Objetivo

O objetivo neste estudo é fazer previsões de até 2 anos dos valores esperados da demanda mensal de peçãs para equipamenteos grandes/pesados.