diff --git a/R/MorettinA8.R b/R/MorettinA8.R
new file mode 100644
index 0000000000000000000000000000000000000000..060a71e12a95873e6b9346077a0fd146329d4e3e
--- /dev/null
+++ b/R/MorettinA8.R
@@ -0,0 +1,57 @@
+#' @name MorettinA8
+#' @title Índices de Produtividade do Brasil
+#' @description Séries temporais dos índices de produtividade (a) PIB -
+#'     Produto Interno Bruto; (b) IPI - Produção Física Industrial -
+#'     Produtos Alimentares; (c) PFI - Produção Física Industrial -
+#'     Indústria Geral; e (d) Produção Física Industrial - Alimentação e
+#'     Bebidas elaboradas para a indústria.
+#' @format Uma lista de três elementos, em que
+#'
+#' \describe{
+#'
+#' \item{\code{A-PIB}}{São os valores do PIB - Produto Interno Bruto com
+#'     observações anuais de 1861 a 1986.}
+#'
+#' \item{\code{M-PFI}}{São os valores da Produção Física Industrial -
+#'     Indústria geral (base média de 1991=100) com observações mensais
+#'     no período de 1991 a 2000.}
+#'
+#' \item{\code{M-Indices}}{É um objeto de classe \code{mts} que contém
+#'     os valores do imposto sobre produtos industrializados
+#'     (\code{IPI}) e do índice de produção física e industrial (base
+#'     média de 1991=100) referente a alimentação e bebidas
+#'     elaboradas para indústria. As observações são mensais de Janeiro
+#'     de 1985 a Julho de 2000.}
+#'
+#' }
+#'
+#' @keywords TS MTS
+#' @source MORETTIN, TOLOI (2006), Série A8 - Índices, descrita no
+#'     Capítulo 1 pág. 17 e mencionada em diversas páginas.
+#' @examples
+#'
+#' data(MorettinA8)
+#' str(MorettinA8)
+#' MorettinA8
+#'
+#' # Estatísticas pontuais das séries
+#' sapply(MorettinA8, summary)
+#'
+#' # Selecionando as séries individuais
+#' (PIB <- MorettinA8[["A-PIB"]])
+#' (PFI <- MorettinA8[["M-PFI"]])
+#' (IPI <- MorettinA8[["M-Indices"]][, "IPI"])
+#'
+#' # Visualização das séries
+#' library(lattice)
+#'
+#' xyplot(MorettinA8[["A-PIB"]], type = c("o", "g"), pch = 20)
+#' xyplot(MorettinA8[["M-PFI"]], type = c("o", "g"), pch = 20)
+#' xyplot(MorettinA8[["M-Indices"]], type = c("o", "g"), pch = 20)
+#'
+#' # Juntando e visualizando as séries de mesma periodicidade
+#' series <- ts.union(" .PFI" = MorettinA8[["M-PFI"]],
+#'                    " " = MorettinA8[["M-Indices"]])
+#' xyplot(series, type = c("o", "g"), pch = 20, superpose = TRUE)
+#'
+NULL
diff --git a/data-raw/MorettinA8.1.txt b/data-raw/MorettinA8.1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..b53d52630d716568bcc3fecd89127452db3572f0
--- /dev/null
+++ b/data-raw/MorettinA8.1.txt
@@ -0,0 +1,127 @@
+x
+4.57
+5.04
+5.18
+5.35
+5.71
+5.65
+5.14
+5.05
+5.61
+6.48
+6.56
+6.55
+6.72
+7.71
+7.88
+7.98
+7.3
+7.32
+7.38
+7.88
+7.62
+6.86
+6.65
+6.54
+7.02
+8.07
+8.94
+9.25
+9.59
+9.64
+9.35
+9.15
+9.38
+9.14
+8.8
+8.12
+7.33
+6.89
+6.98
+8.08
+9.14
+10.17
+10.48
+11.34
+12.47
+13.76
+14.45
+16.01
+17.81
+20.56
+24.29
+26.75
+26
+22.91
+20.84
+21.07
+21.96
+24.6
+28.47
+30.39
+31.23
+33.76
+39.11
+43.6
+43.64
+44.83
+47.51
+54.28
+52.51
+47.99
+39.45
+39.4
+42.44
+51.18
+58.04
+63.79
+66.35
+68.54
+67.43
+67.53
+65.07
+66.03
+66.3
+68.24
+75.01
+84.48
+87.3
+93.76
+100
+106.44
+112.83
+115.7
+118.59
+130.57
+139.59
+144.05
+155.71
+167.7
+177.09
+194.27
+214.28
+225.63
+229.02
+235.66
+242.02
+254.37
+266.58
+291.37
+317.59
+347.77
+386.9945588503
+433.6211715481
+494.2927069311
+538.9580916864
+567.0479370566
+624.366405312
+652.7093123522
+683.4563052574
+749.8217282154
+799.6116117882
+772.8503401856
+779.9360669456
+760.1972566855
+803.5340676733
+869.8994906313
+941.2628815718
diff --git a/data-raw/MorettinA8.2.txt b/data-raw/MorettinA8.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..eb2cb198bab4671d7fa603f274117456bd2ebffd
--- /dev/null
+++ b/data-raw/MorettinA8.2.txt
@@ -0,0 +1,116 @@
+x
+96.03
+77.87
+89.99
+101.29
+100.33
+100.93
+112.08
+112.72
+104.7
+112.51
+100.19
+91.35
+95.7
+90.16
+93.04
+89.22
+97.99
+99.93
+107.43
+105.25
+101.94
+107.38
+107.82
+103.73
+99.17
+88.89
+103.11
+92.44
+99.53
+99.92
+106.74
+105.81
+106.5
+108
+112.13
+104.53
+96.95
+87.13
+99.95
+91.34
+99.31
+102.42
+107.87
+121.35
+115.68
+114.17
+116.8
+112.32
+109.09
+98.53
+118.25
+100.28
+107.92
+104.52
+113.43
+120.46
+117.54
+127.95
+130.12
+125.18
+125.79
+109.31
+114.23
+110.96
+117.18
+107.31
+126.17
+128.15
+124.97
+133.43
+127.39
+123.41
+120.05
+100.77
+109.12
+115.78
+108.92
+114.47
+127.97
+132.92
+139.46
+142.92
+129.09
+123.92
+115.74
+104.87
+118.48
+109.77
+107.48
+115.01
+131.47
+132.63
+131.54
+132.66
+126
+120.87
+109.5
+99.64
+120.22
+113.17
+115.72
+118.98
+127.28
+140.42
+139.51
+137.92
+134.02
+130.08
+114.75
+113.62
+118.37
+109.86
+117.23
+114.89
+121.85
diff --git a/data-raw/MorettinA8.3.txt b/data-raw/MorettinA8.3.txt
new file mode 100644
index 0000000000000000000000000000000000000000..59d99e80cbdf119ecbdbc67623184ca34cf32fd7
--- /dev/null
+++ b/data-raw/MorettinA8.3.txt
@@ -0,0 +1,188 @@
+IPI	Bebida
+84.15	59.92
+71.53	49.67
+72.55	49.63
+67.02	53.84
+72.61	57.49
+95.6	59.94
+105.12	54.51
+106.67	58.28
+96.97	63.46
+109.78	68.68
+97.8	69.3
+93.63	69.72
+92.39	69.88
+77.03	60.99
+66.75	57.48
+69.81	64.84
+73.01	72.92
+90.07	67.25
+100.8	77.81
+97.12	74.96
+103.99	81.57
+115.94	87.45
+97.8	81.78
+92.48	79.45
+92.14	76.84
+85.61	72.69
+86.39	73.31
+75.96	71.74
+73.53	64.27
+96.19	55.71
+103.02	59.83
+105.14	66.17
+111.03	71.38
+117.06	77.84
+104.21	77.88
+100.38	78.67
+87.06	77.4
+76.24	66.73
+78.47	73
+70.55	69.85
+75.14	64.22
+110.17	72.22
+112.72	64.64
+115.2	71.84
+111.23	75.73
+99.91	74.7
+96.85	75.32
+89.9	81.01
+82.1	73.99
+72.06	65.1
+78.65	75.69
+71.45	77.47
+74.93	85.84
+96.85	89.84
+103.18	80.53
+114.2	87.12
+112.74	86.68
+122.21	93.66
+111.57	91.55
+97.83	86.61
+100.62	89.89
+82.5	80.13
+76.56	73.99
+65.81	69.5
+83.59	90.27
+92.06	82.57
+107.18	80.37
+116.34	83.45
+109.26	83.13
+118.22	92.47
+111.21	97.07
+95.1	93.9
+95.41	90.99
+74.4	77.52
+84.5	86.95
+93.51	109.13
+99.95	103.65
+103.34	109.75
+115.93	110.25
+118.06	107.59
+109.83	103.5
+115.65	115.16
+101.47	97.86
+87.93	87.65
+87.44	83.97
+82.39	74.02
+86.54	77.01
+88.74	74.54
+96.92	93.9
+107.86	83.92
+116.07	79.09
+114.03	77.59
+105.72	79.39
+111.31	92.79
+106.46	92.03
+95.59	91.92
+90.36	82.42
+77.73	77.49
+93.38	91.54
+89.65	80.3
+100.53	95.91
+105.84	90.8
+115.23	92.46
+113.98	90.25
+107.98	90.58
+107.94	99.87
+107.11	102.06
+95.89	93.45
+87.9	79.19
+76.12	80.65
+90.34	91.97
+85.33	89.91
+99.31	93.98
+107.17	95.14
+115.51	82.88
+126.9	107.12
+117.71	115.08
+116.51	117.13
+109.81	124.46
+99.9	122.79
+95.68	115.55
+84.69	106.41
+102.81	132.93
+89.73	120.24
+104.3	107.2
+109.88	109.97
+119.3	106.86
+125.92	116.11
+121.31	119.69
+131.09	120.43
+127.37	128.39
+115.37	122.48
+110.74	113.13
+93.78	109.35
+100.79	107.59
+99.53	112.54
+115.55	109.17
+115.33	95.92
+133.29	114.53
+135.62	111.83
+126.63	113.36
+134.93	123.96
+121.51	123.47
+109.79	124.58
+103.95	113.65
+88.2	95.87
+99.46	100.02
+105.22	131.62
+111.99	106.44
+117.25	102.91
+132.74	112.5
+136.36	110.47
+140.65	117.69
+143.1	121.4
+121.2	119.52
+111.36	123.06
+101.67	109.85
+92.32	94.07
+102.13	124.66
+102.57	101.02
+112.58	102.78
+125.52	102.38
+140.47	110.99
+138.75	105.05
+135.9	109.98
+135.16	117.34
+131.06	118.53
+112.08	128.84
+98.9	94.29
+89.77	88.54
+107.46	113.61
+104.98	129.35
+126.52	97.76
+129.81	97.27
+136.54	100.76
+148.31	107.58
+143.41	114.39
+142.99	123.33
+130.43	126.08
+115.05	132.26
+100.13	95.26
+99.9	93.55
+105.38	134.62
+101.96	117.45
+116.19	115.11
+124.66	99.17
+131.1	101.1
diff --git a/data/MorettinA8.rda b/data/MorettinA8.rda
new file mode 100644
index 0000000000000000000000000000000000000000..ba10e8546267f9d48139c06fba0e3434e05244c9
Binary files /dev/null and b/data/MorettinA8.rda differ
diff --git a/man/MorettinA8.Rd b/man/MorettinA8.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..29f22c77d373e96ef41592cb698602731061ec53
--- /dev/null
+++ b/man/MorettinA8.Rd
@@ -0,0 +1,64 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/MorettinA8.R
+\name{MorettinA8}
+\alias{MorettinA8}
+\title{Índices de Produtividade do Brasil}
+\format{Uma lista de três elementos, em que
+
+\describe{
+
+\item{\code{A-PIB}}{São os valores do PIB - Produto Interno Bruto com
+    observações anuais de 1861 a 1986.}
+
+\item{\code{M-PFI}}{São os valores da Produção Física Industrial -
+    Indústria geral (base média de 1991=100) com observações mensais
+    no período de 1991 a 2000.}
+
+\item{\code{M-Indices}}{É um objeto de classe \code{mts} que contém
+    os valores do imposto sobre produtos industrializados
+    (\code{IPI}) e do índice de produção física e industrial (base
+    média de 1991=100) referente a alimentação e bebidas
+    elaboradas para indústria. As observações são mensais de Janeiro
+    de 1985 a Julho de 2000.}
+
+}}
+\source{
+MORETTIN, TOLOI (2006), Série A8 - Índices, descrita no
+    Capítulo 1 pág. 17 e mencionada em diversas páginas.
+}
+\description{
+Séries temporais dos índices de produtividade (a) PIB -
+    Produto Interno Bruto; (b) IPI - Produção Física Industrial -
+    Produtos Alimentares; (c) PFI - Produção Física Industrial -
+    Indústria Geral; e (d) Produção Física Industrial - Alimentação e
+    Bebidas elaboradas para a indústria.
+}
+\examples{
+
+data(MorettinA8)
+str(MorettinA8)
+MorettinA8
+
+# Estatísticas pontuais das séries
+sapply(MorettinA8, summary)
+
+# Selecionando as séries individuais
+(PIB <- MorettinA8[["A-PIB"]])
+(PFI <- MorettinA8[["M-PFI"]])
+(IPI <- MorettinA8[["M-Indices"]][, "IPI"])
+
+# Visualização das séries
+library(lattice)
+
+xyplot(MorettinA8[["A-PIB"]], type = c("o", "g"), pch = 20)
+xyplot(MorettinA8[["M-PFI"]], type = c("o", "g"), pch = 20)
+xyplot(MorettinA8[["M-Indices"]], type = c("o", "g"), pch = 20)
+
+# Juntando e visualizando as séries de mesma periodicidade
+series <- ts.union(" .PFI" = MorettinA8[["M-PFI"]],
+                   " " = MorettinA8[["M-Indices"]])
+xyplot(series, type = c("o", "g"), pch = 20, superpose = TRUE)
+
+}
+\keyword{MTS}
+\keyword{TS}