From 9ebac38d86eaa5874e92f82861dcd8747305e813 Mon Sep 17 00:00:00 2001
From: Bruno Geronymo <geronymobruno@hotmail.com>
Date: Mon, 10 Oct 2016 16:26:54 -0300
Subject: [PATCH] Adiciona Tabela 52 (AndradeEx8.11).
---
R/AndradeEx8.11.R | 41 +++++++++++++++++++++++++++++++
data-raw/AndradeEx8.11.txt | 31 +++++++++++++++++++++++
data/AndradeEx8.11.rda | Bin 0 -> 393 bytes
man/AndradeEx8.11.Rd | 49 +++++++++++++++++++++++++++++++++++++
4 files changed, 121 insertions(+)
create mode 100644 R/AndradeEx8.11.R
create mode 100644 data-raw/AndradeEx8.11.txt
create mode 100644 data/AndradeEx8.11.rda
create mode 100644 man/AndradeEx8.11.Rd
diff --git a/R/AndradeEx8.11.R b/R/AndradeEx8.11.R
new file mode 100644
index 00000000..81fee5b7
--- /dev/null
+++ b/R/AndradeEx8.11.R
@@ -0,0 +1,41 @@
+#' @name AndradeEx8.11
+#' @title Comparação entre o Peso Vivo e o Peso Jejum do Gado Crioulo
+#' Lageano
+#' @description Para comparar o peso vivo e o peso jejum do gado crioulo
+#' lageano, um pesquisador selecionou aleatoriamente uma amostra de
+#' 15 animais e anotou seus pesos.
+#' @format Um \code{data.frame} com 30 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{animal}}{Fator de 15 níveis qualitativos, que são
+#' os animais.}
+#'
+#' \item{\code{estado}}{Fator de 2 níveis qualitativos, que indica
+#' o estado (vivo ou jejum) em que o animal foi pesado.}
+#'
+#' \item{\code{peso}}{Peso do animais, em kg.}
+#'
+#' }
+#' @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
+#' 11, pág. 409)
+#' @examples
+#'
+#' data(AndradeEx8.11)
+#' str(AndradeEx8.11)
+#'
+#' library(lattice)
+#' dotplot(jitter(peso) ~ animal,
+#' groups = estado,
+#' auto.key = list(title = "Estado",
+#' cex.title = 1.1,
+#' columns = 2),
+#' type = "o",
+#' data = AndradeEx8.11,
+#' xlab = "Animal",
+#' ylab = "Peso (kg)")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeEx8.11.txt b/data-raw/AndradeEx8.11.txt
new file mode 100644
index 00000000..09c38487
--- /dev/null
+++ b/data-raw/AndradeEx8.11.txt
@@ -0,0 +1,31 @@
+animal estado peso
+1 vivo 498
+2 vivo 510
+3 vivo 540
+4 vivo 580
+5 vivo 440
+6 vivo 350
+7 vivo 595
+8 vivo 513
+9 vivo 398
+10 vivo 410
+11 vivo 450
+12 vivo 495
+13 vivo 508
+14 vivo 515
+15 vivo 560
+1 jejum 453
+2 jejum 466
+3 jejum 491
+4 jejum 480
+5 jejum 405
+6 jejum 315
+7 jejum 557
+8 jejum 477
+9 jejum 353
+10 jejum 380
+11 jejum 412
+12 jejum 453
+13 jejum 462
+14 jejum 477
+15 jejum 505
diff --git a/data/AndradeEx8.11.rda b/data/AndradeEx8.11.rda
new file mode 100644
index 0000000000000000000000000000000000000000..4538da2ac449329df083aff150992d3aa644f6d1
GIT binary patch
literal 393
zcmZ>Y%CIzaj8qGb-0EQVkAZRB|NsC0pKx?wtbdTk5a6I+e*gUk1_uWR1_%sbaA4fP
zsO!2=qebONRlkOG;Ib=U?L&Btj2IXvWNtF$Sox~TZFaDNtq*4hgUN*xCnQazq>@;=
z+=8ll=1r(-R&!urcHrd?V7O4{^Xc}o*)wm7Hp`eCiM()Xt76-0o~xcpoVL$QrUZti
za5ZXhda2&@2-=@;rRSHH>%rBF-6mG-@e%WWe&q3DlMC)KUYZPV=6MT0b#O78$~(Q-
zqOd7{+L=?gS{RL;CNr5?SX6BM@zb&(VNsXHvR#>#r3WHC#16C^Ghv$Bsl<`MYpAg)
zO@+5p)P(WYX&ugE(>IGKv;OTCe;fMuN_5G?j9J+Q%}K3Z%2Qd6EaE@)SFr!^v^B@A
z^^GQPZ~wjTVWvlpqc1b3ha=PdK9f)Lbsf*!YO$Cl?(tS-dYQrF-CNue7%FnbXB+2^
wrYqC#E)8Vbdwr|WKQ6n)FLETj|Mb3^f9;&YF}H{NAHDNf&Lt$ag6;kR0B?Dx(f|Me
literal 0
HcmV?d00001
diff --git a/man/AndradeEx8.11.Rd b/man/AndradeEx8.11.Rd
new file mode 100644
index 00000000..c0fe89c3
--- /dev/null
+++ b/man/AndradeEx8.11.Rd
@@ -0,0 +1,49 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx8.11.R
+\name{AndradeEx8.11}
+\alias{AndradeEx8.11}
+\title{Comparação entre o Peso Vivo e o Peso Jejum do Gado Crioulo
+ Lageano}
+\format{Um \code{data.frame} com 30 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{animal}}{Fator de 15 níveis qualitativos, que são
+ os animais.}
+
+\item{\code{estado}}{Fator de 2 níveis qualitativos, que indica
+ o estado (vivo ou jejum) em que o animal foi pesado.}
+
+\item{\code{peso}}{Peso do animais, em kg.}
+
+}}
+\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
+ 11, pág. 409)
+}
+\description{
+Para comparar o peso vivo e o peso jejum do gado crioulo
+ lageano, um pesquisador selecionou aleatoriamente uma amostra de
+ 15 animais e anotou seus pesos.
+}
+\examples{
+
+data(AndradeEx8.11)
+str(AndradeEx8.11)
+
+library(lattice)
+dotplot(jitter(peso) ~ animal,
+ groups = estado,
+ auto.key = list(title = "Estado",
+ cex.title = 1.1,
+ columns = 2),
+ type = "o",
+ data = AndradeEx8.11,
+ xlab = "Animal",
+ ylab = "Peso (kg)")
+
+}
+\keyword{AAS}
+
--
GitLab