From cd28787fb526f791c57942f7a0af4b1bcd7ee34b Mon Sep 17 00:00:00 2001
From: Bruno Geronymo <geronymobruno@hotmail.com>
Date: Mon, 12 Sep 2016 16:29:14 -0300
Subject: [PATCH] Adiciona Tabela 20 (AndradeTb2.27).
---
R/AndradeTb2.27.R | 45 ++++++++++++++++++++++++
data-raw/.~lock.AndradeTb2.26.csv# | 1 -
data-raw/.~lock.AndradeTb2.27.csv# | 1 +
data-raw/AndradeTb2.27.txt | 7 ++++
data/AndradeTb2.27.rda | Bin 0 -> 269 bytes
man/AndradeTb2.27.Rd | 53 +++++++++++++++++++++++++++++
6 files changed, 106 insertions(+), 1 deletion(-)
create mode 100644 R/AndradeTb2.27.R
delete mode 100644 data-raw/.~lock.AndradeTb2.26.csv#
create mode 100644 data-raw/.~lock.AndradeTb2.27.csv#
create mode 100644 data-raw/AndradeTb2.27.txt
create mode 100644 data/AndradeTb2.27.rda
create mode 100644 man/AndradeTb2.27.Rd
diff --git a/R/AndradeTb2.27.R b/R/AndradeTb2.27.R
new file mode 100644
index 00000000..47984f3f
--- /dev/null
+++ b/R/AndradeTb2.27.R
@@ -0,0 +1,45 @@
+#' @name AndradeTb2.27
+#' @title Estudo da Eficiência de uma Vacina Antigripal
+#' @description Estudo para avaliar a eficiência de uma nova vacina
+#' antigripal, a qual foi administrada aos membros de uma pequena
+#' comunidade, em duas doses, ao longo de duas semanas. Algumas
+#' pessoas tomaram as duas doses, outras tomaram apenas a primeira
+#' dose e outras não tomaram nenhuma dose. Os tratamentos foram
+#' aplicados em 1.000 habitantes dessa comunidade.
+#' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{Saude}}{Fator de 2 níveis qualitativos que são os estados
+#' de saúde dos habitantes.}
+#'
+#' \item{\code{Vacina}}{Fator de 3 níveis qualitativos que são as
+#' dosagens utilizadas da nova vacina antigripal.}
+#'
+#' \item{\code{Freq}}{Frequência conjunta do estado de saúde e da
+#' vacinação dos habitantes.}
+#'
+#' }
+#' @keywords AAS
+#' @source Estatística para as ciências agrárias e biológicas: com
+#' noções de experimentação / Dalton F. Andrade, Paulo J. Ogliari.
+#' 2. ed. rev. e ampl. - Florianópolis: Ed. da UFSC, 2010. (Tabela
+#' 2.27, pág. 108)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(AndradeTb2.27)
+#' str(AndradeTb2.27)
+#'
+#' xyplot(Freq ~ Saude,
+#' groups = Vacina,
+#' data = AndradeTb2.27,
+#' type = "b",
+#' auto.key = list(title = "Vacinação",
+#' cex.title = 1.1,
+#' columns = 3),
+#' xlab = "Estado de Saúde",
+#' ylab = "Frequência")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/.~lock.AndradeTb2.26.csv# b/data-raw/.~lock.AndradeTb2.26.csv#
deleted file mode 100644
index cd938667..00000000
--- a/data-raw/.~lock.AndradeTb2.26.csv#
+++ /dev/null
@@ -1 +0,0 @@
-,pet-estatistica2,petestatistica2-G31M-ES2C,12.09.2016 15:50,file:///home/pet-estatistica2/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/.~lock.AndradeTb2.27.csv# b/data-raw/.~lock.AndradeTb2.27.csv#
new file mode 100644
index 00000000..ab906f88
--- /dev/null
+++ b/data-raw/.~lock.AndradeTb2.27.csv#
@@ -0,0 +1 @@
+,pet-estatistica2,petestatistica2-G31M-ES2C,12.09.2016 16:12,file:///home/pet-estatistica2/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/AndradeTb2.27.txt b/data-raw/AndradeTb2.27.txt
new file mode 100644
index 00000000..2ecb6b90
--- /dev/null
+++ b/data-raw/AndradeTb2.27.txt
@@ -0,0 +1,7 @@
+Saude Vacina Freq
+Gripados NaoVacinados 24
+NaoGripados NaoVacinados 289
+Gripados UmaDose 9
+NaoGripados UmaDose 100
+Gripados DuasDoses 13
+NaoGripados DuasDoses 565
diff --git a/data/AndradeTb2.27.rda b/data/AndradeTb2.27.rda
new file mode 100644
index 0000000000000000000000000000000000000000..0c9adc3bd2e85750cb3f82490487ca9606007e8d
GIT binary patch
literal 269
zcmZ>Y%CIzaj8qGbEc0beWneg3f8hT=4+jNCp$64Pc?Wy-{|ycd41yaNespAI1Yh~$
zyCiejtR!YrUIv3x5*IF9V4QG)fq{WhX{N8o$){2h$_g3GzPv_N6C+ip^W?Pz%~<y8
z=4q8EF*TiB`S^Q<HQTI{KYefdlM#6<rhn$5S1%{sHTiLH()<mL8VTO+`y{oli>7hN
z2J}4O5t=s9#c)~Ev4w4hz4tp0I4Co?EOGc+xsKH{>!wZl_2l$TY44+};``)X5AIme
zSNOs5p5DHNE7~o^8WhiO6ZmmS=wxdi7fY9{;5?&~U9QZQD+P6&15SF+lUkW-b;id+
bQ6urv?1B~iNecZR%T<C~IoVS#garTqGnH|$
literal 0
HcmV?d00001
diff --git a/man/AndradeTb2.27.Rd b/man/AndradeTb2.27.Rd
new file mode 100644
index 00000000..f3d00d49
--- /dev/null
+++ b/man/AndradeTb2.27.Rd
@@ -0,0 +1,53 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.27.R
+\name{AndradeTb2.27}
+\alias{AndradeTb2.27}
+\title{Estudo da Eficiência de uma Vacina Antigripal}
+\format{Um \code{data.frame} com 6 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{Saude}}{Fator de 2 níveis qualitativos que são os estados
+ de saúde dos habitantes.}
+
+\item{\code{Vacina}}{Fator de 3 níveis qualitativos que são as
+ dosagens utilizadas da nova vacina antigripal.}
+
+\item{\code{Freq}}{Frequência conjunta do estado de saúde e da
+ vacinação dos habitantes.}
+
+}}
+\source{
+Estatística para as ciências agrárias e biológicas: com
+ noções de experimentação / Dalton F. Andrade, Paulo J. Ogliari.
+ 2. ed. rev. e ampl. - Florianópolis: Ed. da UFSC, 2010. (Tabela
+ 2.27, pág. 108)
+}
+\description{
+Estudo para avaliar a eficiência de uma nova vacina
+ antigripal, a qual foi administrada aos membros de uma pequena
+ comunidade, em duas doses, ao longo de duas semanas. Algumas
+ pessoas tomaram as duas doses, outras tomaram apenas a primeira
+ dose e outras não tomaram nenhuma dose. Os tratamentos foram
+ aplicados em 1.000 habitantes dessa comunidade.
+}
+\examples{
+
+library(lattice)
+
+data(AndradeTb2.27)
+str(AndradeTb2.27)
+
+xyplot(Freq ~ Saude,
+ groups = Vacina,
+ data = AndradeTb2.27,
+ type = "b",
+ auto.key = list(title = "Vacinação",
+ cex.title = 1.1,
+ columns = 3),
+ xlab = "Estado de Saúde",
+ ylab = "Frequência")
+
+}
+\keyword{AAS}
+
--
GitLab