From e221bbc36434facae6f3f9e4bd0172a00e6e33ce Mon Sep 17 00:00:00 2001
From: Bruna Wundervald <brunadaviesw@gmail.com>
Date: Fri, 30 Sep 2016 19:12:54 -0300
Subject: [PATCH] Adiciona os arquivos da tabela 11.4 do Morettin

---
 R/MorettinTb11.4.R          |  33 +++++
 data-raw/MorettinTb4.10.txt | 253 ++++++++++++++++++++++++++++++++++++
 data/MorettinTb11.4.rda     | Bin 0 -> 641 bytes
 3 files changed, 286 insertions(+)
 create mode 100644 R/MorettinTb11.4.R
 create mode 100644 data-raw/MorettinTb4.10.txt
 create mode 100644 data/MorettinTb11.4.rda

diff --git a/R/MorettinTb11.4.R b/R/MorettinTb11.4.R
new file mode 100644
index 00000000..6b1d83a0
--- /dev/null
+++ b/R/MorettinTb11.4.R
@@ -0,0 +1,33 @@
+#' @title Vazões Históricas do Rio Paranaíba
+#' @description Dados sobre as vazões históricas mensais do 
+#'     rio Paranaíba, na Estação Gamela (Companhia Furnas).
+#'     A tabela é referente ao período de Janeiro de 1955 a Dezembro
+#'     de 1975. 
+#'     
+#' @format Uma série temporal (classe \code{ts}), com 252 observações
+#'     mensais, de janeiro de 1955 a dezembro de 1975.
+#' @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 11.4, Página 300)
+#' @examples
+#'
+#' data(MorettinTb11.4)
+#' str(MorettinTb11.4)
+#' MorettinTb11.4
+#'
+#' # Médias anuais
+#' aggregate(MorettinTb11.4, FUN = mean)
+#'
+#' # Médias mensais
+#' tapply(MorettinTb11.4, cycle(MorettinTb11.4), mean)
+#'
+#' # Visualização da série
+#' library(lattice)
+#' xyplot(MorettinTb11.4, type = c("o", "g"), pch = 19, col = "pink")
+#'
+#' # Gráfico da decomposição sazonal
+#' library(latticeExtra)
+#' xyplot(stl(MorettinTb11.4, s.window = 12), col = "skyblue1")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/MorettinTb4.10.txt b/data-raw/MorettinTb4.10.txt
new file mode 100644
index 00000000..9fc2851b
--- /dev/null
+++ b/data-raw/MorettinTb4.10.txt
@@ -0,0 +1,253 @@
+x
+202
+183
+129
+198
+68
+51
+41
+30
+26
+48
+78
+405
+238
+163
+271
+113
+131
+106
+67
+46
+46
+36
+145
+282
+489
+389
+458
+465
+231
+148
+108
+86
+69
+62
+92
+254
+242
+305
+195
+139
+108
+81
+67
+54
+50
+64
+51
+49
+206
+136
+211
+102
+65
+51
+40
+33
+27
+45
+95
+81
+222
+310
+260
+153
+101
+73
+58
+43
+34
+37
+122
+264
+602
+568
+384
+199
+172
+108
+83
+68
+48
+40
+57
+95
+333
+374
+396
+150
+136
+95
+75
+62
+62
+56
+82
+541
+377
+278
+163
+106
+77
+62
+47
+40
+32
+29
+42
+42
+203
+234
+121
+104
+77
+49
+43
+35
+29
+56
+97
+207
+343
+473
+508
+242
+145
+107
+85
+71
+57
+74
+148
+305
+667
+499
+285
+233
+144
+111
+86
+65
+54
+129
+184
+362
+444
+403
+307
+189
+128
+97
+77
+61
+53
+51
+119
+317
+305
+288
+272
+148
+103
+79
+65
+56
+54
+69
+74
+187
+147
+146
+125
+92
+67
+51
+42
+36
+32
+54
+236
+280
+487
+404
+251
+164
+109
+84
+70
+55
+58
+74
+82
+85
+57
+57
+91
+59
+39
+37
+30
+27
+30
+55
+92
+344
+19
+201
+172
+145
+82
+66
+61
+49
+39
+113
+218
+194
+253
+225
+230
+264
+134
+101
+79
+62
+51
+87
+139
+147
+167
+110
+250
+225
+126
+92
+72
+59
+45
+57
+44
+113
+229
+192
+104
+116
+72
+53
+52
+40
+32
+53
+95
+102
diff --git a/data/MorettinTb11.4.rda b/data/MorettinTb11.4.rda
new file mode 100644
index 0000000000000000000000000000000000000000..3a5c48d9845243706021b18d47c65ff8fcb63c21
GIT binary patch
literal 641
zcmZ>Y%CIzaj8qGbG@Ul-AOmwn{r7){4h#;CHPZF}!QlND76(QL2?quThXW1{tPV^D
zJBxV)g*8`vH1w6z+~Vx;<qG5COUC{lZO&J|%wK6#>G+D5;jEM9Poa6Oatkh)FfjYd
zEy!S8z`(%3zCw!GKQwT`$pt1nzC6B$lFZI5CQ^w~89Z(ZMiL%NJT6~iVBlrQU|@4#
zU|?WYU@zh5G+4lBz~sO(!O^K<A%~YxgMg!_sM7)`1=m=GH7gD#{9YA!z$#taR!&{p
zgfHA!pywIi=4$`qse(=0uNWPhuvaqVOk$t<k!NjO$5w50t9&@gVO71{Moznep#99E
zhOAN{sVA1a*)e~%U(8|0&1*C}->UXJt^BI<S*UfJo}Pi<yMswDjl46zpUU-oabZGw
z(bcF&6$~tj%#Rry{7V#<ix|u2EdQ&iz;H7`A*z>yQ^G;&D%-wWGY+bBO!j2d(oiUL
z)Z^XZ_GHnCxCHt3o~aJ4k6ZQEq|Di6$iu*&;$I{ne;`K1lk4NLQx{J?l?<7)eVbU%
zaVy^6!ifxr6*<@#oOu)y8(0h)7z8F5sBlO!Ik7M^vG5$@ZO&b0XvUl@F<anPj>Gxq
zj9Yj+H{^2mFqw(JV^}*w#V<qUViU7y(~L_zwJTKgee`v;e%Jh15#?TJ6{|Hx;*4H|
z9FO`&{j_Ppj>_hdpS@NoicXj=BwM0rmMd|PE#qU*-V)pE-JC~SKRwn-Xl-6x$L)62
zieurC$fri0tHPtD*Qi{6v5My)3s?003%;uwBrD9`i)e@4`~5e3L$LEEb$f{=W;sb2
sc`xm}YIaZ8a&_I2;;-gaAgy!m!<p4Nm3gnb|HPgYdFbSDEy|k(04H|(EdT%j

literal 0
HcmV?d00001

-- 
GitLab