description

DESCRIPTION

@@ -48,6 +48,10 @@ Suggests:
     MASS,
     qcc,
     multcomp,
+<<<<<<< HEAD
     vcd
+=======
+    zoo
+>>>>>>> 066a380ad38a539e7cba6fc85d44a9888cce0cf0
 VignetteBuilder: knitr
 RoxygenNote: 5.0.1

R/Atmosfera.R

+#' @name Atmosfera
+#' @title Temperatura e Umidade do Ar na Cidade de São Paulo
+#' @description Dados atmosféricos sobre temperatura
+#'     (\code{Temperatura}) e umidade relativa do ar (\code{Umidade}),
+#'     mensuradas ao meio-dia, na cidade de São Paulo. Observações
+#'     diárias referentes a 1º de Janeiro a 31 de Dezembro de 1997.
+#' @format Uma série temporal bivariada (classe \code{mts}), com 365
+#'     observações diárias de 1º de Janeiro a 31 de Dezembro de 1997,
+#'     das seguintes medidas:
+#'
+#' \describe{
+#'
+#' \item{\code{Temperatura}}{Temperaturas, mensuradas ao meio-dia em
+#'     [VER UNIDADE DE MEDIDA].}
+#'
+#' \item{\code{Umidade}}{Umidades relativa do ar, mensuradas ao meio-dia
+#'     em [VER UNIDADE DE MEDIDA].}
+#'
+#' }
+#' @seealso \code{\link{Poluentes}}.
+#' @keywords TS MTS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A7 - Atmosfera, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Atmosfera)
+#' str(Atmosfera)
+#' Atmosfera
+#'
+#' # Estatísticas resumo das séries
+#' apply(Atmosfera, 2, summary)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Atmosfera, type = c("o", "g"), pch = 19, col = "turquoise")
+#'
+#' # Mesclando com as séries dos agentes poluentes no mesmo período
+#' # help(Poluentes)
+#' series <- ts.union(Atmosfera, Poluentes)
+#' xyplot(series, type = c("o", "g"), pch = 20, col = "black")
+#'
+NULL

R/Banespa.R

+#' @name Banespa
+#' @title Ações Preferenciais do Banco do Estado de São Paulo - Banespa
+#' @description Dados sobre os valores dos preços diários das ações
+#'     preferenciais do banco do Estado de São Paulo - Banespa PN. Os
+#'     dados são referentes ao período do dia 3 de Janeiro de 1995 até
+#'     27 de Dezembro de 2000, contabilizando somente os dias utéis.
+#' @format Uma série temporal irregularmente espaçada (classe
+#'     \code{\link[zoo]{zoo}}), com 1498 observações dos dias utéis de 3
+#'     de Janeiro de 1995 a 27 de Dezembro de 2000.
+#' @seealso \code{\link{Cemig}}, \code{\link{Globo}}, \code{\link{IBV}},
+#'     \code{\link{Petro}} e \code{\link{TAM}}.
+#' @keywords TS TSI
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A9 - Mercado Financeiro, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Banespa)
+#'
+#' library(zoo)
+#' str(Banespa)
+#' Banespa
+#'
+#' # Médias anuais e mensais
+#' aggregate(Banespa, by = format(time(Banespa), "%Y"), FUN = mean)
+#' aggregate(Banespa, by = format(time(Banespa), "%B"), FUN = mean)
+#'
+#' # Série temporal regularmente espaçada de médias mensais
+#' aggregate(Banespa, by = as.yearmon, FUN = mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Banespa, type = c("o", "g"), pch = 19, col = "seashell3")
+#'
+#' # Visualizando os dados diários sobre o mercado financeiro presentes
+#' # em MORETTIN (2006)
+#' # sapply(c("Cemig", "Globo", "IBV", "Petro", "TAM"), help)
+#' series <- merge(Banespa, Cemig, Globo, IBV, Petro, TAM)
+#' xyplot(series, grid = TRUE, col = "black")
+#'
+NULL

R/Bebida.R

+#' @name Bebida
+#' @title Imposto em Bebidas
+#' @description Dados sobre a produção física industrial (PFI), de
+#'     alimentação e bebidas elaboradas, do Brasil. As observações são
+#'     mensais e referem-se ao período de Janeiro de 1985 a Julho de
+#'     2000. [DE QUE SE REFERE ESSA DESCRIÇÃO? CORRIGIR?]
+#' @format Uma série temporal (classe \code{ts}), com 187 observações
+#'     mensais de Janeiro de 1985 a Julho de 2000.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A8 - Índices, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Bebida)
+#' str(Bebida)
+#' Bebida
+#'
+#' # Médias anuais
+#' aggregate(Bebida, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(Bebida, cycle(Bebida), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Bebida, type = c("o", "g"), pch = 19, col = "rosybrown")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(Bebida, s.window = 12), col = "red3")
+#'
+NULL

R/Cemig.R

+#' @name Cemig
+#' @title Ações da Companhia Energética de Minas Gerais - CEMIG
+#' @description Dados sobre os preços diários das ações da Companhia
+#'     Energética de Minas Gerais - CEMIG de 3 de Janeiro de 1995 a 27
+#'     de Dezembro de 2000, contabilizados somente nos dias utéis.
+#' @format Uma série temporal irregularmente espaçada (classe
+#'     \code{\link[zoo]{zoo}}), com 1498 observações diárias, de 3 de
+#'     janeiro de 1995 a 27 de dezembro de 2000.
+#' @seealso \code{\link{Banespa}}, \code{\link{Globo}},
+#'     \code{\link{IBV}}, \code{\link{Petro}} e \code{\link{TAM}}.
+#' @keywords TS TSI
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A9 - Mercado Financeiro, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Cemig)
+#'
+#' library(zoo)
+#' str(Cemig)
+#' Cemig
+#'
+#' # Médias anuais e em cada mês
+#' aggregate(Cemig, by = format(time(Cemig), "%Y"), FUN = mean)
+#' aggregate(Cemig, by = format(time(Cemig), "%B"), FUN = mean)
+#'
+#' # Série regularmente espaçada com médias mensais
+#' aggregate(Cemig, by = as.yearmon, FUN = mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Cemig, type = c("o", "g"), pch = 19, col = "brown")
+#'
+#' # Visualizando os dados diários sobre o mercado financeiro presentes
+#' # em MORETTIN (2006)
+#' # sapply(c("Banespa", "Globo", "IBV", "Petro", "TAM"), help)
+#' series <- merge(Cemig, Banespa, Globo, IBV, Petro, TAM)
+#' xyplot(series, grid = TRUE, col = "black")
+#'
+NULL

R/Consumo.R

+#' @name Consumo
+#' @title Vendas Físicas na Região Metropolitana de São Paulo
+#' @description Dados sobre a quantidade de vendas físicas na região
+#'     metropolitana de São Paulo. A série tem observações mensais
+#'     referentes ao período de Janeiro de 1984 a Outubro de 1996.
+#' @format Uma série temporal (classe \code{ts}), com 154 observações
+#'     mensais, de Janeiro de 1984 a Outubro de 1996.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A11 - Consumo, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Consumo)
+#' str(Consumo)
+#' Consumo
+#'
+#' # Médias anuais
+#' aggregate(Consumo, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(Consumo, cycle(Consumo), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Consumo, type = c("o", "g"), pch = 19, col = "springgreen")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(Consumo, s.window = 12), col = "yellow3")
+#'
+NULL

R/Energia.R

+#' @name Energia
+#' @title Consumo de Energia Elétrica no Espírito Santo
+#' @description Dados sobre o consumo de energia elétrica no estado do
+#'     Espírito Santo. A série é referente a valores mensais de consumo
+#'     no período de Janeiro de 1968 a Setembro de 1979.
+#'
+#' @format Uma série temporal (classe \code{ts}), com 141 observações
+#'     mensais de Janeiro de 1968 a Setembro de 1979.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard
+#'     Blucher. (Série A5 - Energia, mencionada em diversas
+#'     páginas)
+#' @examples
+#'
+#' data(Energia)
+#' str(Energia)
+#' Energia
+#'
+#' # Médias anuais
+#' aggregate(Energia, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(Energia, cycle(Energia), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Energia, type = c("o", "g"), pch = 19, col = "lightblue")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(Energia, s.window = 12), col = "yellowgreen")
+#'
+NULL

R/Fortaleza.R

+#' @name Fortaleza
+#' @title Precipitação Atmosférica em Fortaleza, Ceará
+#' @description Dados sobre precipitação atmosférica em Fortaleza, no
+#'     Ceará. A série é referente ao período de 1849 a 1997.
+#' @format Uma série temporal (classe \code{ts}), com 149 observações
+#'     anuais de 1849 a 1997.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A3 - Chuva, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Fortaleza)
+#' str(Fortaleza)
+#' Fortaleza
+#'
+#' # Resumos da série
+#' summary(Fortaleza)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Fortaleza, type = c("o", "g"), pch = 20, col = "orange")
+#'
+NULL

R/Globo.R

+#' @name Globo
+#' @title Ações da Globo Cabo
+#' @description Dados sobre os preços diários das ações da Globo Cabo de
+#'     06 de Novembro de 1996 a 27 de Dezembro de 2000. Os dados foram
+#'     registrados apenas nos dias utéis dentre o período indicado.
+#' @format Uma série temporal irregularmente espaçada (classe
+#'     \code{\link[zoo]{zoo}}), com 1037 observações dos dias utéis de
+#'     06 de Novembro de 1996 a 27 de Dezembro de 2000.
+#' @seealso \code{\link{Banespa}}, \code{\link{Cemig}}, \code{\link{IBV}},
+#'     \code{\link{Petro}} e \code{\link{TAM}}.
+#' @keywords TS TSI
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A9 - Mercado Financeiro, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Globo)
+#'
+#' library(zoo)
+#' str(Globo)
+#' Globo
+#'
+#' # Médias anuais e mensais
+#' aggregate(Globo, by = format(time(Globo), "%Y"), FUN = mean)
+#' aggregate(Globo, by = format(time(Globo), "%B"), FUN = mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Globo, type = c("o", "g"), pch = 19, col = "violet")
+#'
+#' # Visualizando os dados diários sobre o mercado financeiro presentes
+#' # em MORETTIN (2006)
+#' # sapply(c("Banespa", "Cemig", "IBV", "Petro", "TAM"), help)
+#' series <- merge(Globo, Banespa, Cemig, IBV, Petro, TAM)
+#' xyplot(series, grid = TRUE, col = "black")
+#'
+NULL

R/IBV.R

+#' @name IBV
+#' @title Índice da Bolsa de Valores de São Paulo
+#' @description Dados sobre o índice da bolsa de valores (IBV) de São
+#'     Paulo. Os dados são referentes a observações diárias, apenas dias
+#'     utéis, no período de 03 de Janeiro de 1995 até 27 de Dezembro de
+#'     2000.
+#' @format Uma série temporal irregularmente espaçada (classe
+#'     \code{\link[zoo]{zoo}}), com 1498 observações diárias, de 3 de
+#'     janeiro de 1995 a 27 de dezembro de 2000.
+#' @seealso \code{\link{Banespa}}, \code{\link{Cemig}},
+#'     \code{\link{Globo}}, \code{\link{Petro}} e \code{\link{TAM}}.
+#' @keywords TS TSI
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A9 - Mercado Financeiro, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(IBV)
+#'
+#' library(zoo)
+#' str(IBV)
+#' IBV
+#'
+#' # Médias anuais
+#' aggregate(IBV, by = format(time(IBV), "%Y"), FUN = mean)
+#' aggregate(IBV, by = format(time(IBV), "%B"), FUN = mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(IBV, type = c("o", "g"), pch = 19, col = "salmon")
+#'
+#' # Visualizando os dados diários sobre o mercado financeiro presentes
+#' # em MORETTIN (2006)
+#' # sapply(c("Banespa", "Cemig", "Globo", "Petro", "TAM"), help)
+#' series <- merge(IBV, Banespa, Cemig, Globo, Petro, TAM)
+#' xyplot(series, grid = TRUE, col = "black")
+#'
+NULL

R/IBVSP.R

+#' @name IBVSP
+#' @title Índice da Bolsa de Valores de São Paulo (1994-2001)
+#' @description Dados mensais sobre o índice da bolsa de valores (IBV)
+#'     de São Paulo de Junho de 1994 a Agosto de 2001.
+#' @format Uma série temporal (classe \code{ts}), com 87 observações
+#'     mensais de Junho de 1994 a Agosto de 2001.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A9 - Mercado Financeiro, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(IBVSP)
+#' str(IBVSP)
+#' IBVSP
+#'
+#' # Médias anuais
+#' aggregate(IBVSP, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(IBVSP, cycle(IBVSP), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(IBVSP, type = c("o", "g"), pch = 19, col = "royalblue")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(IBVSP, s.window = 12), col = "khaki3")
+#'
+NULL

R/ICV.R

+#' @name ICV
+#' @title Índice de Custo de Vida em São Paulo
+#' @description Dados sobre o índice de custo de vida (ICV), na cidade
+#'     de São Paulo. A série é referente a observações mensais no
+#'     período de Janeiro de 1970 a Outubro de 1980.
+#' @format Uma série temporal (classe \code{ts}), com 126 observações
+#'     mensais de Janeiro de 1970 a Outubro de 1980.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A10 - M-ICV, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(ICV)
+#' str(ICV)
+#' ICV
+#'
+#' # Médias anuais
+#' aggregate(ICV, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(ICV, cycle(ICV), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(ICV, type = c("o", "g"), pch = 19, col = "peachpuff")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(ICV, s.window = 12), col = "peru")
+#'
+NULL

R/IPI.R

+#' @name IPI
+#' @title Imposto Sobre Produtos Industrializados do Brasil
+#' @description Dados de imposto sobre produtos industrializados (IPI),
+#'     de produtos alimentares do Brasil. As observações são mensais e
+#'     referentes ao período de Janeiro de 1985 a Julho de 2000.
+#' @format Uma série temporal (classe \code{ts}), com 187 observações
+#'     mensais de Janeiro de 1985 a Julho de 2000.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A8 - Índices, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(IPI)
+#' str(IPI)
+#' IPI
+#'
+#' # Médias anuais
+#' aggregate(IPI, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(IPI, cycle(IPI), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(IPI, type = c("o", "g"), pch = 19, col = "sienna")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(IPI, s.window = 12), col = "navyblue")
+#'
+NULL

R/Lavras.R

+#' @name Lavras
+#' @title Precipitação Atmosférica em Lavras, Minas Gerais
+#' @description Dados sobre precipitação atmosférica, em Lavras, no
+#'     estado de Minas Gerais. A série é referente ao período de Janeiro
+#'     de 1966 a Dezembro de 1997.
+#' @format Uma série temporal (classe \code{ts}), com 384 observações
+#'     mensais de Janeiro de 1966 a Dezembro de 1997.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A3 - Chuva, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Lavras)
+#' str(Lavras)
+#' Lavras
+#'
+#' # Médias anuais
+#' aggregate(Lavras, FUN = mean)
+#'
+#' # Médias Mensais
+#' tapply(Lavras, cycle(Lavras), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Lavras, type = c("o", "g"), pch = 19, col = "orange")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(Lavras, s.window = 12), col = "green")
+#'
+NULL

R/Manchas.R

+#' @name Manchas
+#' @title Número de Manchas Solares de Wölfer
+#' @description Dados anuais sobre o número de manchas solares de Wölfer
+#'     referentes ao período de 1749 a 1924.
+#' @format Uma série temporal (classe \code{ts}), com 176 observações
+#'     anuais de 1749 a 1924.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A2 - Manchas, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Manchas)
+#' str(Manchas)
+#' Manchas
+#'
+#' # Medidas resumo da série
+#' summary(Manchas)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Manchas, type = c("o", "g"), pch = 19, col = "wheat4")
+#'
+NULL

R/MorettinTb4.10.R

+#' @name MorettinTb4.10
+#' @title Preço Médio de Café no Estado de São Paulo
+#' @description Dados sobre o preço médio mensal (corrente) recebido
+#'     pelos produtos de café [PREÇO MÉDIO DOS PRODUTOS? QUAL A UNIDADE
+#'     DE MEDIDA?] no Estado de São Paulo durante o período de Janeiro
+#'     de 1970 a Junho de 1979.
+#' @format Uma série temporal (classe \code{ts}), com 144 observações
+#'     mensais de Janeiro de 1970 a Junho de 1979.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard
+#'     Blucher. (Tabela 4.10 pág. 100)
+#' @examples
+#'
+#' data(MorettinTb4.10)
+#' str(MorettinTb4.10)
+#' MorettinTb4.10
+#'
+#' # Médias anuais
+#' aggregate(MorettinTb4.10, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(MorettinTb4.10, cycle(MorettinTb4.10), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(MorettinTb4.10, type = c("o", "g"), pch = 19)
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(MorettinTb4.10, s.window = 12))
+#'
+NULL

R/MorettinTb4.12.R

+#' @name MorettinTb4.12
+#' @title Vendas de Óleo Lubrificante
+#' @description Dados das quantidades de vendas de óleo lubrificante
+#'     [ONDE? BRASIL, SP?]. A série é referente aos meses de Janeiro de
+#'     1975 a Dezembro de 1978.
+#' @format Uma série temporal (classe \code{ts}), com 48 observações,
+#'     mensais de Janeiro de 1975 a Dezembro de 1978.
+#' @keywords TS
+#' @source MORETTIN, TOLOI (2006), Tabela 4.12, pág. 101.
+#' @examples
+#'
+#' data(MorettinTb4.12)
+#' str(MorettinTb4.12)
+#' MorettinTb4.12
+#'
+#' # Médias anuais
+#' aggregate(MorettinTb4.12, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(MorettinTb4.12, cycle(MorettinTb4.12), mean)
+#'
+#' # Visualização da série temporal
+#' library(lattice)
+#' xyplot(MorettinTb4.12, type = c("o", "g"), pch = 19,
+#'        col = "palegreen2", lwd = 2, scales = list(rot = 0))
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(MorettinTb4.13, s.window = 12), col = "violetred")
+#'
+NULL

R/MorettinTb4.13.R

+#' @name MorettinTb4.13
+#' @title Vendas de Refrigerante [ONDE?]
+#' @description Dados sobre as quantidades de vendas de refrigerantes
+#'     [ONDE? BRASIL? SP?]. A série é referente aos meses de Janeiro de
+#'     1970 a Dezembro de 1973.
+#' @format Uma série temporal (classe \code{ts}), com 48 observações
+#'     mensais de Janeiro de 1970 a Dezembro de 1973.
+#' @keywords TS
+#' @source MORETTIN, TOLOI (2006), Tabela 4.13, pág. 102.
+#' @examples
+#'
+#' data(MorettinTb4.13)
+#' str(MorettinTb4.13)
+#' MorettinTb4.13
+#'
+#' # Médias anuais
+#' aggregate(MorettinTb4.13, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(MorettinTb4.13, cycle(MorettinTb4.13), mean)
+#'
+#' library(lattice)
+#' xyplot(MorettinTb4.13, type = c("o", "g"), pch = 19,
+#'        scales = list(rot = 0), col = "tomato")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(MorettinTb4.10, s.window = 12), col = "turquoise")
+#'
+NULL

R/Ozonio.R

+#' @name Ozonio
+#' @title Concentração de Ozônio em Azuza, Califórnia
+#' @description Dados sobre a concentração de Ozônio em Azuza, no estado
+#'     da Califórnia, EUA. A série é referente à concentrações mensais
+#'     no período de Janeiro de 1956 a Dezembro de 1970.
+#' @format Uma série temporal (classe \code{ts}), com 180 observações
+#'     mensais de Janeiro de 1956 a Dezembro de 1970.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A4 - Ozônio, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(Ozonio)
+#' str(Ozonio)
+#' Ozonio
+#'
+#' # Médias anuais
+#' aggregate(Ozonio, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(Ozonio, cycle(Ozonio), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(Ozonio, type = c("o", "g"), pch = 19, col = "tomato")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(Ozonio, s.window = 12), col = "lightgreen")
+#'
+NULL

R/PFI.R

+#' @name PFI
+#' @title Produção Física Industrial do Brasil
+#' @description Dados sobre a produção física industrial (PFI), da
+#'     indústria geral, do Brasil. As observações são mensais e
+#'     referentes ao período de Janeiro de 1991 a Julho de 2000.
+#' @format Uma série temporal (classe \code{ts}), com 115 observações
+#'     mensais de Janeiro de 1991 a Julho de 2000.
+#' @keywords TS
+#' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
+#'     Temporais (2nd ed.). São Paulo, SP: Editora Egard Blucher. (Série
+#'     A8 - Índices, mencionada em diversas páginas)
+#' @examples
+#'
+#' data(PFI)
+#' str(PFI)
+#' PFI
+#'
+#' # Médias anuais
+#' aggregate(PFI, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(PFI, cycle(PFI), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(PFI, type = c("o", "g"), pch = 19, col = "sienna")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(PFI, s.window = 12), col = "navyblue")
+#'
+NULL