From 7a5fc73e4331557c675a6327fd45bfbaecc1e564 Mon Sep 17 00:00:00 2001
From: Lineu <lialcafre@gmail.com>
Date: Fri, 2 Sep 2016 18:06:01 -0300
Subject: [PATCH] Adiciona Tabela 2.4
---
R/NetoTb2.4.R | 32 ++++++++++++++++++++++++++++++++
data-raw/NetoTb2.4.txt | 6 ++++++
data/NetoTb2.4.rda | Bin 0 -> 292 bytes
man/NetoTb2.4.Rd | 40 ++++++++++++++++++++++++++++++++++++++++
4 files changed, 78 insertions(+)
create mode 100644 R/NetoTb2.4.R
create mode 100644 data-raw/NetoTb2.4.txt
create mode 100644 data/NetoTb2.4.rda
create mode 100644 man/NetoTb2.4.Rd
diff --git a/R/NetoTb2.4.R b/R/NetoTb2.4.R
new file mode 100644
index 00000000..a3c88034
--- /dev/null
+++ b/R/NetoTb2.4.R
@@ -0,0 +1,32 @@
+#' @name NetoTb2.4
+#' @title Comparação de resultados obtidos por 2 químicos
+#' @description Dois químicos, Arrhenius e Berzelius foram encarregados
+#' de analisar lotes de vinagre de 5 diferentes fabricantes, cada
+#' um obteve 5 diferentes resultados. O experimento contém um único
+#' fator com dois níveis (os químicos) e uma resposta (a
+#' concentração).
+#' @format Um \code{data.frame} com 5 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{fator}}{Fator de 2 níveis qualitativos.}
+#'
+#' \item{\code{fabricantes}}{Fator de 5 níveis qualitativos que são os 5
+#' diferentes fabricantes de vinagre.}
+#'
+#' \item{\code{concentração}}{Concentração de vinagre obtida.}
+#'
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Tabela 2.4, pág. 79)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(NetoTb2.4)
+#' str(NetoTb2.4)
+#'
+#' xyplot(Arrh + Ber ~ Amo, data = NetoTb2.4, type = "o",
+#' xlab = "Amostra", ylab = "Resposta ")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/NetoTb2.4.txt b/data-raw/NetoTb2.4.txt
new file mode 100644
index 00000000..2baf3c2a
--- /dev/null
+++ b/data-raw/NetoTb2.4.txt
@@ -0,0 +1,6 @@
+Amo Arrh Ber d
+1 3.77 3.62 0.15
+2 3.85 3.69 0.16
+3 4.07 4.10 -0.03
+4 4.83 4.70 0.13
+5 5.05 4.89 0.16
diff --git a/data/NetoTb2.4.rda b/data/NetoTb2.4.rda
new file mode 100644
index 0000000000000000000000000000000000000000..0ae74aedc5e8cb5e6c772dab3b7df22340e81d9f
GIT binary patch
literal 292
zcmZ>Y%CIzaj8qGbJSbw=%D~Y5|NlSp7)FLf8Ky4>O<e5V@62#wXkg@FWN^5{#?YX^
z!OXdV;aWn|GRI{N%vTspq$C;`mu0c9e7Qo=ZPrW!H8nLi#|4tij>~45FfgPnN|9o?
zz`(dbO3H-6B!giIgU6=@oqjALHkU+2jx<SeZkv_PetvU^AbXEMUvkk5Ce<lC3VO%S
zuPhQ{IG~`QI)(Ma3a&_pJ`E+kg(_@+?u0JkXk}v2R(w%0U28$}@@Bphtjj-c`MQ1C
z%CFL2{p>||N!@fSRC@Bf!^G5k^5KV@Tl5a(8lC&e!q*%9*?&etT(U^Y_dBPqMa0iE
yVo7OEx)R%=biiT8#1FM9O(Gf|eoVg%o2F=qYBYahXxQJqQ)!NdM?#mxp#}iE7jaeq
literal 0
HcmV?d00001
diff --git a/man/NetoTb2.4.Rd b/man/NetoTb2.4.Rd
new file mode 100644
index 00000000..9908034d
--- /dev/null
+++ b/man/NetoTb2.4.Rd
@@ -0,0 +1,40 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2.4.R
+\name{NetoTb2.4}
+\alias{NetoTb2.4}
+\title{Comparação de resultados obtidos por 2 químicos}
+\format{Um \code{data.frame} com 5 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{fator}}{Fator de 2 níveis qualitativos.}
+
+\item{\code{fabricantes}}{Fator de 5 níveis qualitativos que são os 5
+ diferentes fabricantes de vinagre.}
+
+\item{\code{concentração}}{Concentração de vinagre obtida.}
+
+}}
+\source{
+Barros Neto, Benício de (2010), (Tabela 2.4, pág. 79)
+}
+\description{
+Dois químicos, Arrhenius e Berzelius foram encarregados
+ de analisar lotes de vinagre de 5 diferentes fabricantes, cada
+ um obteve 5 diferentes resultados. O experimento contém um único
+ fator com dois níveis (os químicos) e uma resposta (a
+ concentração).
+}
+\examples{
+
+library(lattice)
+
+data(NetoTb2.4)
+str(NetoTb2.4)
+
+xyplot(Arrh + Ber ~ Amo, data = NetoTb2.4, type = "o",
+ xlab = "Amostra", ylab = "Resposta ")
+
+}
+\keyword{DBC}
+
--
GitLab