From 128539d0573bfaa307ce01fccf70a1a4fe4b20a8 Mon Sep 17 00:00:00 2001
From: Bruno Geronymo <geronymobruno@hotmail.com>
Date: Mon, 10 Oct 2016 17:31:49 -0300
Subject: [PATCH] Adiciona Tabela Extra 1 (AndradeEx8.17).
---
R/AndradeEx8.17.R | 39 ++++++++++++++++++++++++++++++
data-raw/AndradeEx8.17.txt | 41 ++++++++++++++++++++++++++++++++
data/AndradeEx8.17.rda | Bin 0 -> 338 bytes
man/AndradeEx8.17.Rd | 47 +++++++++++++++++++++++++++++++++++++
4 files changed, 127 insertions(+)
create mode 100644 R/AndradeEx8.17.R
create mode 100644 data-raw/AndradeEx8.17.txt
create mode 100644 data/AndradeEx8.17.rda
create mode 100644 man/AndradeEx8.17.Rd
diff --git a/R/AndradeEx8.17.R b/R/AndradeEx8.17.R
new file mode 100644
index 00000000..61750419
--- /dev/null
+++ b/R/AndradeEx8.17.R
@@ -0,0 +1,39 @@
+#' @name AndradeEx8.17
+#' @title Comportamento da espécie \emph{Mandevilla velutina}
+#' @description Experimento para avaliar o comportamento \emph{in vitro}
+#' da espécie \emph{Mandevilla velutina} (Apocinácea), proveniente
+#' de duas regiões: cerrado e restinga. Após isolar os explantes,
+#' com um nó com duas gemas axilares, obtidos das plantas matrizes,
+#' foi instalado o experimento com delineamento inteiramente
+#' casualizado com 20 repetições (20 explantes para o cerrado de 20
+#' para a restinga); portanto, temos um total de 40 unidades
+#' experimentais. A variável utilizada foi a altura em cm dos
+#' explantes de \emph{Mandevilla} cultivadas \emph{in vitro} durante
+#' 45 dias.
+#' @format Um \code{data.frame} com 40 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{regiao}}{Fator de 2 níveis qualitativos, que indica a
+#' região da plantação.}
+#'
+#' \item{\code{altura}}{Altura em cm dos explantes de \emph{Mandevilla}
+#' cultivadas \emph{in vitro} durante 45 dias.}
+#'
+#' }
+#' @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
+#' 17, pág. 412)
+#' @examples
+#'
+#' data(AndradeEx8.17)
+#' str(AndradeEx8.17)
+#'
+#' boxplot(altura ~ regiao,
+#' data = AndradeEx8.17,
+#' xlab = "Região",
+#' ylab = "Altura (cm)")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeEx8.17.txt b/data-raw/AndradeEx8.17.txt
new file mode 100644
index 00000000..216943c5
--- /dev/null
+++ b/data-raw/AndradeEx8.17.txt
@@ -0,0 +1,41 @@
+regiao altura
+Cerrado 5.3
+Cerrado 2.5
+Cerrado 5.1
+Cerrado 2.6
+Cerrado 1.2
+Cerrado 3.1
+Cerrado 4.1
+Cerrado 3.7
+Cerrado 5
+Cerrado 1.6
+Cerrado 3
+Cerrado 4.7
+Cerrado 2.6
+Cerrado 4.2
+Cerrado 4
+Cerrado 4.7
+Cerrado 6.4
+Cerrado 2.9
+Cerrado 3.2
+Cerrado 2.1
+Restinga 3.6
+Restinga 2.3
+Restinga 6
+Restinga 2.1
+Restinga 5.2
+Restinga 4.3
+Restinga 3.9
+Restinga 2.1
+Restinga 2.4
+Restinga 2
+Restinga 2.7
+Restinga 3.9
+Restinga 5.6
+Restinga 4.7
+Restinga 1.9
+Restinga 5.1
+Restinga 4.7
+Restinga 2.1
+Restinga 6.1
+Restinga 8.1
diff --git a/data/AndradeEx8.17.rda b/data/AndradeEx8.17.rda
new file mode 100644
index 0000000000000000000000000000000000000000..fbebb4b12f4ad996c0bb1b4c3eb5c287d3328f49
GIT binary patch
literal 338
zcmZ>Y%CIzaj8qGbw0bXW&cG;B|Lp(w{|OF`76;xj2sr33pMSuCfx&=*jlqFKaRZ~y
z4QF4?CG%J%ZT(q!c}*m)d}UmArAqDC6sf9}OBkR)Wn!=ol*y^qY<$Zq&V}*AOO}-!
zEXTE3G%U|lHt{Z9-6^Sd_x=ApE}ZWBo@XRS-#aAWlUQ$H@#OGvOB=5yXO#dpMxT^D
z$`_`v*a+N|QIp)h;mqL~6#;X_q|ZELR%uc2U=T_!E4QerkYHG($srPc`q=h`466CB
zR_=P0zV+>d371wlHXe9T&>A4Zs#v-rpyc4sn~T;?%m2K8r~Ao0g}dI~{U|u;dtB}r
zAx9~d6s5YG2UC~bjm(@^qnxs!$iG%+;V-kTecs|6$3DAg#hf}Zw{z2tjtPnV?!7B?
lIRv6E+zxqp<J~m&IF1=f^OKV&@9*BJG)Kcjw!Cw80|4|kjI#g$
literal 0
HcmV?d00001
diff --git a/man/AndradeEx8.17.Rd b/man/AndradeEx8.17.Rd
new file mode 100644
index 00000000..1a1bb3f4
--- /dev/null
+++ b/man/AndradeEx8.17.Rd
@@ -0,0 +1,47 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx8.17.R
+\name{AndradeEx8.17}
+\alias{AndradeEx8.17}
+\title{Comportamento da espécie \emph{Mandevilla velutina}}
+\format{Um \code{data.frame} com 40 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{regiao}}{Fator de 2 níveis qualitativos, que indica a
+ região da plantação.}
+
+\item{\code{altura}}{Altura em cm dos explantes de \emph{Mandevilla}
+ cultivadas \emph{in vitro} durante 45 dias.}
+
+}}
+\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
+ 17, pág. 412)
+}
+\description{
+Experimento para avaliar o comportamento \emph{in vitro}
+ da espécie \emph{Mandevilla velutina} (Apocinácea), proveniente
+ de duas regiões: cerrado e restinga. Após isolar os explantes,
+ com um nó com duas gemas axilares, obtidos das plantas matrizes,
+ foi instalado o experimento com delineamento inteiramente
+ casualizado com 20 repetições (20 explantes para o cerrado de 20
+ para a restinga); portanto, temos um total de 40 unidades
+ experimentais. A variável utilizada foi a altura em cm dos
+ explantes de \emph{Mandevilla} cultivadas \emph{in vitro} durante
+ 45 dias.
+}
+\examples{
+
+data(AndradeEx8.17)
+str(AndradeEx8.17)
+
+boxplot(altura ~ regiao,
+ data = AndradeEx8.17,
+ xlab = "Região",
+ ylab = "Altura (cm)")
+
+}
+\keyword{AAS}
+
--
GitLab