Correção: a Tb3.13 era 3.14; Correção no .R da Tb3.10; Adição do .R das...

Correção: a Tb3.13 era 3.14; Correção no .R da Tb3.10; Adição do .R das tabelas 3.12 e 3.1.1.14 do Morettin

R/MorettinTb3.10.R

@@ -41,12 +41,10 @@
 #' data(MorettinTb3.10)
 #' 
 #' library(lattice)
-#' library(latticeExtra)
-#' 
 #' str(MorettinTb3.10)
 #' 
-#' xyplot(MorettinTb3.10[ , -1], type = c("l", "g"), 
-#'     layout = c(2, 6), xlab = "Meses", ylab = "Valores", 
+#' xyplot(MorettinTb3.10, type = c("l", "g"), 
+#'     layout = c(2, 6), xlab = "Anos", ylab = "Valores", 
 #'     main = "Série de IPI", strip = strip.custom(bg = "white"), 
 #'     lwd = 2, col = c("red", "green", "violetred", "blue", "palegreen2", 
 #'                      "orange"), 

R/MorettinTb3.12.R

+#' @name MorettinTb3.12
+#' @title Importações feitas pelo Brasil
+#' @description Dados de uma série de importações feitas pelo Brasil, 
+#'     de acordo com o Banco Central do Brasil. A unidade de medida é
+#'     milhões de dólares.
+#' @format Uma série temporal (classe \code{ts}) mensal de 1968 a 1974, 
+#'     com 7 observações, em que
+#'
+#' \describe{
+#'
+#' \item{\code{Jan}}{Número decimal que indica as importações do mês de Janeiro.}
+#' 
+#' \item{\code{Fev}}{Número decimal que indica as importações do mês de Fevereiro.}
+#'     
+#' \item{\code{Mar}}{Número decimal que indica as importações do mês de Março.}
+#' 
+#' \item{\code{Abril}}{Número decimal que indica as importações do mês de Abril.}
+#' 
+#' \item{\code{Mai}}{Número decimal que indica as importações do mês de Maio.}
+#' 
+#' \item{\code{Jun}}{Número decimal que indica as importações do mês de Junho.}
+#' 
+#' \item{\code{Jul}}{Número decimal que indica as importações do mês de Julho.}
+#' 
+#' \item{\code{Ago}}{Número decimal que indica as importações do mês de Agosto.}
+#' 
+#' \item{\code{Set}}{Número decimal que indica as importações do mês de Setembro.}
+#' 
+#' \item{\code{Out}}{Número decimal que indica as importações do mês de Outubro.}
+#' 
+#' \item{\code{Nov}}{Número decimal que indica as importações do mês de Novembro.}
+#' 
+#' \item{\code{Dez}}{Número decimal que indica as importações do mês de Dezembro.}
+#'      
+#' }
+#' @keywords TS temporais
+#' @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 3.12
+#'     pág. 78)
+#' @examples
+#'
+#' data(MorettinTb3.12)
+#' 
+#' library(lattice)
+#' str(MorettinTb3.12)
+#' 
+#' fivenum(MorettinTb3.12)
+#' xyplot(MorettinTb3.12, type = c("l", "g"), 
+#'        layout = c(2, 6), xlab = "Meses", ylab = "Valores", 
+#'        main = "Importações feitas pelo Brasil", strip = strip.custom(bg = "white"), 
+#'        lwd = 2, col = c("red", "violetred", "blue", "yellow", "palegreen2", 
+#'                         "orange"), 
+#'        scales = list(y = list(rot = 0)))
+NULL
\ No newline at end of file

R/MorettinTb3.14.R

+#' @name MorettinTb3.14
+#' @title Consumo de gasolina na Califórnia
+#' @description Dados de uma série de consumo de gasolina na Califórnia, 
+#'     com uma peridiocidade trimestral. A tabela refere-se aos anos de 1960 a
+#'     1973.
+#' @format Uma série temporal (classe \code{ts}) mensal de 1960 a 1973, 
+#'     com 14 observações, em que
+#'
+#' \describe{
+#'
+#' \item{\code{prim}}{Número inteiro que indica as observações referentes ao
+#'     primeiro semestre de cada ano.}
+#' 
+#' \item{\code{seg}}{Número inteiro que indica as observações referentes ao
+#'     segundo semestre de cada ano.}
+#' 
+#' \item{\code{terc}}{Número inteiro que indica as observações referentes ao
+#'     terceiro semestre de cada ano.}
+#'     
+#' \item{\code{quar}}{Número inteiro que indica as observações referentes ao
+#'     quarto semestre de cada ano.}
+#'      
+#' }
+#' @keywords TS temporais
+#' @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 3.14
+#'     pág. 82)
+#' @examples
+#'
+#' data(MorettinTb3.14)
+#' 
+#' library(lattice)
+#' str(MorettinTb3.14)
+#' 
+#' fivenum(MorettinTb3.14)
+#' 
+#' colnames(MorettinTb3.14) <- c("Primeiro", "Segundo", "Terceiro", "Quarto")
+#' xyplot(MorettinTb3.14, type = c("l", "g"), 
+#'        layout = c(2, 2), xlab = "Trimestre", ylab = "Milhões de Galões", 
+#'        main = "Consumo de gasolina na Califórnia", strip = strip.custom(bg = "white"), 
+#'        lwd = 2, col = c("violetred", "blue", "yellow", "palegreen2"), 
+#'        scales = list(y = list(rot = 0)))
+NULL
\ No newline at end of file

data-raw/MorettinTb3.10.txt

-Ano	Jan	Fev	Mar	Abr	Mai	Jun	Jul	Ago	Set	Out	Nov	Dez
-1952	20.8	20.1	20.5	17.1	16.7	15.2	14.8	16.8	15.9	18	19.1	19.8
-1953	21.9	20.7	20.9	18.1	16.9	15.5	13.3	15.8	17.8	18.4	18.6	19.4
-1954	22.1	21.5	21	18.3	16.5	16.3	15.7	16.2	17.7	17.7	18.5	19.6
-1955	21.1	21.9	20.7	18.6	15.7	14.9	14.7	15.5	16.6	16.4	16.9	20.2
-1956	23.4	21.2	20.3	18.1	15.1	13.5	14	13.6	17.6	17	16.7	19.1
+Jan	Fev	Mar	Abr	Mai	Jun	Jul	Ago	Set	Out	Nov	Dez
+20.8	20.1	20.5	17.1	16.7	15.2	14.8	16.8	15.9	18	19.1	19.8
+21.9	20.7	20.9	18.1	16.9	15.5	13.3	15.8	17.8	18.4	18.6	19.4
+22.1	21.5	21	18.3	16.5	16.3	15.7	16.2	17.7	17.7	18.5	19.6
+21.1	21.9	20.7	18.6	15.7	14.9	14.7	15.5	16.6	16.4	16.9	20.2
+23.4	21.2	20.3	18.1	15.1	13.5	14	13.6	17.6	17	16.7	19.1