diff --git a/R/MorettinTb4.10.R b/R/MorettinTb4.10.R index e44046c8871329483e67e429db48214ef92b64e9..32188b1f3b1022f543b84fb4304011265eeaeda1 100644 --- a/R/MorettinTb4.10.R +++ b/R/MorettinTb4.10.R @@ -1,58 +1,33 @@ #' @name MorettinTb4.10 -#' @title Preço Médio Mensal de Café -#' @description Dados de uma série do preço médio mensal (corrente), -#' recebido pelos produtos de café, no Estado de São Paulo. A tabela -#' é referente aos meses de Janeiro de 1970 a Junho de 1979. -#' @format Uma série temporal (classe \code{ts}), com 12 observações, -#' em que -#' -#' \describe{ -#' -#' \item{\code{Jan}}{Número decimal que indica o preço médio do mês de Janeiro.} -#' -#' \item{\code{Fev}}{Número decimal que indica o preço médio do mês de -#' Fevereiro.} -#' -#' \item{\code{Mar}}{Número decimal que indica o preço médio do mês de Março.} -#' -#' \item{\code{Abril}}{Número decimal que indica o preço médio do mês de Abril.} -#' -#' \item{\code{Mai}}{Número decimal que indica o preço médio do mês de Maio.} -#' -#' \item{\code{Jun}}{Número decimal que indica o preço médio do mês de Junho.} -#' -#' \item{\code{Jul}}{Número decimal que indica o preço médio do mês de Julho.} -#' -#' \item{\code{Ago}}{Número decimal que indica o preço médio do mês de Agosto.} -#' -#' \item{\code{Set}}{Número decimal que indica o preço médio do mês de -#' Setembro.} -#' -#' \item{\code{Out}}{Número decimal que indica o preço médio do mês de Outubro.} -#' -#' \item{\code{Nov}}{Número decimal que indica o preço médio do mês de -#' Novembro.} -#' -#' \item{\code{Dez}}{Número decimal que indica o preço médio do mês de -#' Dezembro.} -#' -#' } -#' @keywords TS temporais +#' @title Preço Médio Mensal de Café no Estado de São Paulo +#' @description Dados sobre o preço médio mensal (corrente), MENSURADO +#' EM ???, recebido pelos produtos de café, no Estado de São Paulo +#' durante o período de 1970 a 1979. referente aos meses 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) +#' Temporais (2nd ed.). São Paulo, SP: Editora Egard +#' Blucher. (Tabela 4.10 pág. 100) #' @examples #' #' data(MorettinTb4.10) -#' -#' library(lattice) #' str(MorettinTb4.10) -#' -#' fivenum(MorettinTb4.10) -#' -#' xyplot(MorettinTb4.10, type = c("l", "g"), -#' layout = c(2, 6), xlab = "Anos", ylab = "Preços", -#' main = "Preço médio mensal do café", strip = strip.custom(bg = "white"), -#' lwd = 2, col = c("violetred", "palegreen2", "yellow"), -#' scales = list(y = list(rot = 0))) -NULL \ No newline at end of file +#' 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 diff --git a/data-raw/MorettinTb4.10.txt b/data-raw/MorettinTb4.10.txt index 919633e54e5cd2fb032ca3ce0b13f9b533fef1f3..e79db26a79b965a937ec89d4c9da34ae43b29b0e 100644 --- a/data-raw/MorettinTb4.10.txt +++ b/data-raw/MorettinTb4.10.txt @@ -1,11 +1,115 @@ -Jan Fev Mar Abr Mai Jun Jul Ago Set Out Nov Dez -123.3 134.77 141.16 144.62 145.76 142.45 144.18 147.68 148.95 148.95 146.69 144.5 -138.82 131.46 137.5 138.22 134.05 130.25 126.55 126.47 125.5 127.09 129.85 132.16 -139.14 141.21 144.07 149.38 157.44 163.45 182.5 222.07 221.98 213.6 216.65 218.61 -228.06 238.34 245.27 249.25 248.89 256.21 278.78 287 286.27 287.7 291.4 298.4 -301.41 312.84 367.31 379.06 368.57 353.05 340.5 322.89 314.3 307.03 308.7 315.95 -337.48 339.39 333.07 327.49 335.09 376 383.57 632.51 638.12 640.45 635.82 649.45 -768.39 891.4 919.2 1057.7 1418.2 1423.8 1412.4 1368.7 1446.5 1492.2 1651.6 1792.3 -2045.4 2158 3401.3 3763.8 3013.9 2574.9 2158.5 1908.4 1801.2 1741.2 2075.5 2089 -2097.8 1968.6 1896.2 1867.9 1815.7 1956.2 1859.9 1878.2 2013.5 1947 1939.9 1843.4 -1907.8 1970.5 2045.2 2211.8 2452 2915.4 NA NA NA NA NA NA +x +123.3 +134.77 +141.16 +144.62 +145.76 +142.45 +144.18 +147.68 +148.95 +148.95 +146.69 +144.5 +138.82 +131.46 +137.5 +138.22 +134.05 +130.25 +126.55 +126.47 +125.5 +127.09 +129.85 +132.16 +139.14 +141.21 +144.07 +149.38 +157.44 +163.45 +182.5 +222.07 +221.98 +213.6 +216.65 +218.61 +228.06 +238.34 +245.27 +249.25 +248.89 +256.21 +278.78 +287 +286.27 +287.7 +291.4 +298.4 +301.41 +312.84 +367.31 +379.06 +368.57 +353.05 +340.5 +322.89 +314.3 +307.03 +308.7 +315.95 +337.48 +339.39 +333.07 +327.49 +335.09 +376 +383.57 +632.51 +638.12 +640.45 +635.82 +649.45 +768.39 +891.4 +919.2 +1057.7 +1418.2 +1423.8 +1412.4 +1368.7 +1446.5 +1492.2 +1651.6 +1792.3 +2045.4 +2158 +3401.3 +3763.8 +3013.9 +2574.9 +2158.5 +1908.4 +1801.2 +1741.2 +2075.5 +2089 +2097.8 +1968.6 +1896.2 +1867.9 +1815.7 +1956.2 +1859.9 +1878.2 +2013.5 +1947 +1939.9 +1843.4 +1907.8 +1970.5 +2045.2 +2211.8 +2452 +2915.4 diff --git a/data/MorettinTb4.10.rda b/data/MorettinTb4.10.rda index fd740863e2f81cf55e59ec8df75f93fa1c2c2c00..6b1c5db175e85910c93ee1612d68165bc3857f43 100644 Binary files a/data/MorettinTb4.10.rda and b/data/MorettinTb4.10.rda differ diff --git a/man/MorettinTb4.10.Rd b/man/MorettinTb4.10.Rd new file mode 100644 index 0000000000000000000000000000000000000000..7da930d7d379f8b53f941485355256ab00f3ac3e --- /dev/null +++ b/man/MorettinTb4.10.Rd @@ -0,0 +1,41 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/MorettinTb4.10.R +\name{MorettinTb4.10} +\alias{MorettinTb4.10} +\title{Preço Médio Mensal de Café no Estado de São Paulo} +\format{Uma série temporal (classe \code{ts}), com 144 observações + mensais, de janeiro de 1970 a junho de 1979.} +\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) +} +\description{ +Dados sobre o preço médio mensal (corrente), MENSURADO + EM ???, recebido pelos produtos de café, no Estado de São Paulo + durante o período de 1970 a 1979. referente aos meses de janeiro + de 1970 a junho de 1979. +} +\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)) + +} +\keyword{TS} +