From 0d062c52acc27915eb04b8354dc3428e53dcca5d Mon Sep 17 00:00:00 2001
From: Bruno Geronymo <geronymobruno@hotmail.com>
Date: Fri, 7 Oct 2016 18:55:58 -0300
Subject: [PATCH] Adiciona Tabela 49 (AndradeTb8.6).
---
R/AndradeTb8.6.R | 49 ++++++++++++++++++++++++++++++++
data-raw/AndradeTb8.6.txt | 5 ++++
data/AndradeTb8.6.rda | Bin 0 -> 242 bytes
man/AndradeTb8.6.Rd | 57 ++++++++++++++++++++++++++++++++++++++
4 files changed, 111 insertions(+)
create mode 100644 R/AndradeTb8.6.R
create mode 100644 data-raw/AndradeTb8.6.txt
create mode 100644 data/AndradeTb8.6.rda
create mode 100644 man/AndradeTb8.6.Rd
diff --git a/R/AndradeTb8.6.R b/R/AndradeTb8.6.R
new file mode 100644
index 00000000..ca7a2bc7
--- /dev/null
+++ b/R/AndradeTb8.6.R
@@ -0,0 +1,49 @@
+#' @name AndradeTb8.6
+#' @title Experimento de Avaliação de Classes Fenotípicas de Plantas
+#' Dihíbridas
+#' @description Na descendência obtida de cruzamentos entre plantas
+#' puras de ervilhas com sementes amarelas lisas e outras de
+#' sementes verdes rugosas, obtemos na primeira geração (F1),
+#' ervilhas amarelas lisas. Estas, por autofecundação, produzem, na
+#' segunda geração (F2), ervilhas de quatro tipos: amarelas lisas,
+#' verdes lisas, amarelas rugosas e verdes rugosas. Esse tipo de
+#' experimento avalia se o padrão de segregação dos caracteres
+#' envolvidos segue aquele proposto pela segunda lei de Mendel (lei
+#' da segregação independente), que diz que as proporções esperadas
+#' para esses tipos de ervilhas são: 9/16, 3/16, 3/16 e 1/16,
+#' respectivamente.
+#' @format Um \code{data.frame} com 4 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{textura}}{Fator de 2 níveis qualitativos, que são as
+#' texturas das ervilhas.}
+#'
+#' \item{\code{cor}}{Fator de 2 níveis qualitativos, que são as cores
+#' das ervilhas.}
+#'
+#' \item{\code{freq}}{Frequência absoluta de cada tipo de ervilha.}
+#'
+#' }
+#' @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
+#' 8.6, pág. 372)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(AndradeTb8.6)
+#' str(AndradeTb8.6)
+#'
+#' xyplot(freq ~ cor,
+#' groups = textura,
+#' data = AndradeTb8.6,
+#' auto.key = list(title = "Textura",
+#' cex.title = 1.1,
+#' columns = 2),
+#' xlab = "Cor",
+#' ylab = "Frequência")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeTb8.6.txt b/data-raw/AndradeTb8.6.txt
new file mode 100644
index 00000000..ccc446dd
--- /dev/null
+++ b/data-raw/AndradeTb8.6.txt
@@ -0,0 +1,5 @@
+textura cor freq
+Lisa Amarela 315
+Lisa Verde 108
+Rugosa Amarela 101
+Rugosa Verde 32
diff --git a/data/AndradeTb8.6.rda b/data/AndradeTb8.6.rda
new file mode 100644
index 0000000000000000000000000000000000000000..0f21ea0a2ebf86d37745024294f71f8ab8a2b1f4
GIT binary patch
literal 242
zcmZ>Y%CIzaj8qGb)Lpr16$8V@`UC&Bc`!II3VNuph&tFW-+#b?fq``c!;J}7<(4fw
zYU8>1QbwX#0NczZU)h-5oE=-39ZW7Ta0+Vpq)IN7=wZp6khqj%YQV7v`7BezMZNYj
z#r(d_yM2FO{q5M-IjqS{$HI$!E@ZcLuA3<TNg-~H#)a6fMa@|SPCF(fdYVksaZ%iI
zV6keG_wx`<DZjXko*xxqd~aR-v+rN~^<LMIO+aA2PH4Wukx9ANCayAilCaC1+x)oc
zb>=B%CuS`Ru$!{T$Z(I(rgPa+9-W70*jr7hw2Q56PBijwELRC`<z%`wYt;e(<0NGi
literal 0
HcmV?d00001
diff --git a/man/AndradeTb8.6.Rd b/man/AndradeTb8.6.Rd
new file mode 100644
index 00000000..022518e4
--- /dev/null
+++ b/man/AndradeTb8.6.Rd
@@ -0,0 +1,57 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb8.6.R
+\name{AndradeTb8.6}
+\alias{AndradeTb8.6}
+\title{Experimento de Avaliação de Classes Fenotípicas de Plantas
+ Dihíbridas}
+\format{Um \code{data.frame} com 4 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{textura}}{Fator de 2 níveis qualitativos, que são as
+ texturas das ervilhas.}
+
+\item{\code{cor}}{Fator de 2 níveis qualitativos, que são as cores
+ das ervilhas.}
+
+\item{\code{freq}}{Frequência absoluta de cada tipo de ervilha.}
+
+}}
+\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
+ 8.6, pág. 372)
+}
+\description{
+Na descendência obtida de cruzamentos entre plantas
+ puras de ervilhas com sementes amarelas lisas e outras de
+ sementes verdes rugosas, obtemos na primeira geração (F1),
+ ervilhas amarelas lisas. Estas, por autofecundação, produzem, na
+ segunda geração (F2), ervilhas de quatro tipos: amarelas lisas,
+ verdes lisas, amarelas rugosas e verdes rugosas. Esse tipo de
+ experimento avalia se o padrão de segregação dos caracteres
+ envolvidos segue aquele proposto pela segunda lei de Mendel (lei
+ da segregação independente), que diz que as proporções esperadas
+ para esses tipos de ervilhas são: 9/16, 3/16, 3/16 e 1/16,
+ respectivamente.
+}
+\examples{
+
+library(lattice)
+
+data(AndradeTb8.6)
+str(AndradeTb8.6)
+
+xyplot(freq ~ cor,
+ groups = textura,
+ data = AndradeTb8.6,
+ auto.key = list(title = "Textura",
+ cex.title = 1.1,
+ columns = 2),
+ xlab = "Cor",
+ ylab = "Frequência")
+
+}
+\keyword{AAS}
+
--
GitLab