From 7cf973ad63edf57ab2bb33938b08290fd0291f50 Mon Sep 17 00:00:00 2001
From: Bruno Geronymo <geronymobruno@hotmail.com>
Date: Mon, 10 Oct 2016 16:10:44 -0300
Subject: [PATCH] Adiciona Tabela 51 (AndradeEx8.9).
---
R/AndradeEx8.9.R | 42 ++++++++++++++++++++++++++++++++
data-raw/AndradeEx8.9.txt | 35 ++++++++++++++++++++++++++
data/AndradeEx8.9.rda | Bin 0 -> 386 bytes
man/AndradeEx8.9.Rd | 50 ++++++++++++++++++++++++++++++++++++++
4 files changed, 127 insertions(+)
create mode 100644 R/AndradeEx8.9.R
create mode 100644 data-raw/AndradeEx8.9.txt
create mode 100644 data/AndradeEx8.9.rda
create mode 100644 man/AndradeEx8.9.Rd
diff --git a/R/AndradeEx8.9.R b/R/AndradeEx8.9.R
new file mode 100644
index 00000000..f36fcd07
--- /dev/null
+++ b/R/AndradeEx8.9.R
@@ -0,0 +1,42 @@
+#' @name AndradeEx8.9
+#' @title Estudo da Quantidade de Proteínas após Operação
+#' @description Estudo sobre a possibilidade da quantidade de proteínas
+#' totais no plasma, depois de determinada operação em portadores de
+#' esquistossomose mansônica, ser diferente da quantidade de antes
+#' da operação.
+#' @format Um \code{data.frame} com 17 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{paciente}}{Fator de 17 níveis qualitativos, que são
+#' os pacientes sujeitos a operação.}
+#'
+#' \item{\code{periodo}}{Fator de 2 níveis qualitativos, que indica
+#' o período (antes ou depois) em que foi coletada a quantidade de
+#' proteínas totais no plasma.}
+#'
+#' \item{\code{prot}}{Quantidade de proteínas totais no plasma.}
+#'
+#' }
+#' @keywords AAS
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#' ciências agrárias e biológicas com noções de experimentação (2nd
+#' ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 8, Exercício
+#' 9, pág. 408)
+#' @examples
+#'
+#' data(AndradeEx8.9)
+#' str(AndradeEx8.9)
+#'
+#' library(lattice)
+#' dotplot(jitter(prot) ~ paciente,
+#' groups = periodo,
+#' auto.key = list(title = "Período",
+#' cex.title = 1.1,
+#' columns = 2),
+#' type = "o",
+#' data = AndradeEx8.9,
+#' xlab = "Paciente",
+#' ylab = "Quantidade de Proteínas Totais no Plasma")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeEx8.9.txt b/data-raw/AndradeEx8.9.txt
new file mode 100644
index 00000000..b65b9289
--- /dev/null
+++ b/data-raw/AndradeEx8.9.txt
@@ -0,0 +1,35 @@
+paciente periodo prot
+1 antes 6.9
+2 antes 7.8
+3 antes 6.6
+4 antes 5.9
+5 antes 7.8
+6 antes 6.4
+7 antes 8.8
+8 antes 7.3
+9 antes 8
+10 antes 8.6
+11 antes 7.7
+12 antes 7.9
+13 antes 8.7
+14 antes 5.8
+15 antes 9.2
+16 antes 9.3
+17 antes 8.9
+1 depois 6.9
+2 depois 8.6
+3 depois 8.7
+4 depois 7.3
+5 depois 7.8
+6 depois 8.2
+7 depois 9.3
+8 depois 7.3
+9 depois 7.6
+10 depois 7.8
+11 depois 7.6
+12 depois 7.8
+13 depois 8.1
+14 depois 6.8
+15 depois 8.3
+16 depois 10.2
+17 depois 9.1
diff --git a/data/AndradeEx8.9.rda b/data/AndradeEx8.9.rda
new file mode 100644
index 0000000000000000000000000000000000000000..1204b570f4923c6ce6b5fa90aa3c08dbb351a872
GIT binary patch
literal 386
zcmZ>Y%CIzaj8qGb)M!pKWnkQ0|Lp(&7rVbO);~yN5OB~}zk9%efx&=*je(JYaRXzd
z6U!1I|15w1AbydIuSUGgC$3yL#31LpO6Ib#ny-Y9u&@tPg1|uu!3K{hvwRl|d%j9x
zU|?L3B9*z|vf8yL4SYMjj+r}gCaN6w?PiGDtGQP9Xj<VaHj%y;uO$59lvPvJx}VLA
z_<B5OllOG#tv?$TIIr-`+SY5le)8KjH4+U<0ZUx6Ch7-=<$V2-aIxKauE}NJSzTVU
z4#sF75?4?;W-?((2G0u<F+qjKRSIH3!kN7S4>vL0HkD$Cd$V%Egam#mp~h|EpVIf2
z-eyv|<MK%GcE{o85)Yb1<^}uQPPX5>s3qp|GPlc8Z5`4QHkR9~YW}U-tr%JOcH5nv
zz}k3`cd;r3P4@*w`k8(#;LCp+5k0M^V18@$j%D6=!c8}wHCfU+?fB!ClDDPZSJp&`
teb;IVT-z3#(NuWR*Db@fZwYUc`=!Hq8*bP(+aJ9%(N9E$OW|g(0|28#rWgPK
literal 0
HcmV?d00001
diff --git a/man/AndradeEx8.9.Rd b/man/AndradeEx8.9.Rd
new file mode 100644
index 00000000..87ab8603
--- /dev/null
+++ b/man/AndradeEx8.9.Rd
@@ -0,0 +1,50 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx8.9.R
+\name{AndradeEx8.9}
+\alias{AndradeEx8.9}
+\title{Estudo da Quantidade de Proteínas após Operação}
+\format{Um \code{data.frame} com 17 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{paciente}}{Fator de 17 níveis qualitativos, que são
+ os pacientes sujeitos a operação.}
+
+\item{\code{periodo}}{Fator de 2 níveis qualitativos, que indica
+ o período (antes ou depois) em que foi coletada a quantidade de
+ proteínas totais no plasma.}
+
+\item{\code{prot}}{Quantidade de proteínas totais no plasma.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+ ciências agrárias e biológicas com noções de experimentação (2nd
+ ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 8, Exercício
+ 9, pág. 408)
+}
+\description{
+Estudo sobre a possibilidade da quantidade de proteínas
+ totais no plasma, depois de determinada operação em portadores de
+ esquistossomose mansônica, ser diferente da quantidade de antes
+ da operação.
+}
+\examples{
+
+data(AndradeEx8.9)
+str(AndradeEx8.9)
+
+library(lattice)
+dotplot(jitter(prot) ~ paciente,
+ groups = periodo,
+ auto.key = list(title = "Período",
+ cex.title = 1.1,
+ columns = 2),
+ type = "o",
+ data = AndradeEx8.9,
+ xlab = "Paciente",
+ ylab = "Quantidade de Proteínas Totais no Plasma")
+
+}
+\keyword{AAS}
+
--
GitLab