Capitulo 7

R/CamposEg7.1.6.1.R

+#' @name CamposEg7.1.6.1
+#' @title Influência do Tamanho do Disco na Aração
+#' @description Numa pesquisa realizada pelo Dr. Aldo Duvilio Ometto, do Departamento de 
+#' Engenharia Rural da E.S.A. "Luiz de Queiroz", sobre a "Influencia do Tamanho do Disco de 
+#' Aração", foram provados três diâmetros distintos ou sejam:
+#' D1 = 26 cm; D2 = 28 cm; D3 = 30 cm.
+#' @format Um \code{data.frame} com 5 observações e 3 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{D1}}{ Resultados parciais de "esforço de tração", em kgf,para D1. }
+#'
+#' \item{\code{D2}}{ Resultados parciais de "esforço de tração", em kgf,para D2. }
+#'
+#' \item{\code{D3}}{ Resultados parciais de "esforço de tração", em kgf,para D3. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exemplo 7.1.6.1, pág. 206.
+#' @examples
+#' 
+#'library(lattice)
+#'
+#'data(CamposEg7.1.6.1)
+#'str(CamposEg7.1.6.1)
+#'
+#'boxplot(CamposEg7.1.6.1$D1, CamposEg7.1.6.1$D2, CamposEg7.1.6.1$D3,
+#'        names=c("D1","D2","D3"))
+#'
+#'kruskal.test(CamposEg7.1.6.1)
+#'
+NULL

R/CamposEg7.1.6.2.R

+#' @name CamposEg7.1.6.2
+#' @title Experimento de Alimentação de Porcos.
+#' @description PIMENTEL GOMES (1978) apresenta um exemplo de um experimento (fictício) de 
+#' alimentação de porcos, em que se usaram quadros rações (A,B,C e D), cada uma fornecida a 
+#' cinco animais, escolhidos ao acaso.
+#' @format Um \code{data.frame} com 5 observações e 4 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{A}}{ Aumento de peso (em Kg), utilizando a ração A. }
+#'
+#' \item{\code{B}}{ Aumento de peso (em Kg), utilizando a ração B. }
+#'
+#' \item{\code{C}}{ Aumento de peso (em Kg), utilizando a ração C. }
+#'
+#' \item{\code{D}}{ Aumento de peso (em Kg), utilizando a ração D. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exemplo 7.1.6.2, pág. 207.
+#' @examples
+#' 
+#'library(lattice)
+#'
+#'data(CamposEg7.1.6.2)
+#'str(CamposEg7.1.6.2)
+#'
+#'boxplot(CamposEg7.1.6.2$A, CamposEg7.1.6.2$B, CamposEg7.1.6.2$C, CamposEg7.1.6.2$D,
+#'        names=c("A","B","C","D"))
+#'
+#'kruskal.test(CamposEg7.1.6.2)
+#'
+NULL

R/CamposEg7.3.1.1.R

+#' @name CamposEg7.3.1.1
+#' @title Pesquisa Sobre Qualidade de Vinho.
+#' @description Numa pesquisa sobre qualidade de vinho, foram provados tês tipos, por cinco 
+#' degustadores. Cada degustador provou doze amostras (quatro de cada tipo) e atribuiu a cada 
+#' uma notas de zero a dez.
+#' @format Um \code{data.frame} com 4 observações e 3 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{t1}}{ Média das notas atribuídas pelos cinco degustadores ao vinho do tipo 1. }
+#'
+#' \item{\code{t2}}{ Média das notas atribuídas pelos cinco degustadores ao vinho do tipo 2. }
+#'
+#' \item{\code{t3}}{ Média das notas atribuídas pelos cinco degustadores ao vinho do tipo 3. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exemplo 7.3.1.1, pág. 221.
+#' @examples
+#' 
+#'library(lattice)
+#'
+#'data(CamposEg7.3.1.1)
+#'str(CamposEg7.3.1.1)
+#'
+#'boxplot(CamposEg7.3.1.1$t1, CamposEg7.3.1.1$t2, CamposEg7.3.1.1$t3,
+#'        names=c("Tipo 1","Tipo 2","Tipo 3"))
+#'
+#'kruskal.test(CamposEg7.3.1.1)
+#'
+NULL

R/CamposEg7.3.1.4.R

+#' @name CamposEg7.3.1.4
+#' @title Variedades de Cana-de-açúcar.
+#' @description Num experimento de composição de variedades de cana-de-açúcar, foram 
+#' registrados os rendimentos, em Kg, de açúcar por tonelada de cana.
+#' @format Um \code{data.frame} com 5 observações e 4 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{co413}}{ Rendimento em Kg, de açúcar por tonelada de cana. }
+#'
+#' \item{\code{co419}}{ Rendimento em Kg, de açúcar por tonelada de cana. }
+#'
+#' \item{\code{co421}}{ Rendimento em Kg, de açúcar por tonelada de cana. }
+#'
+#' \item{\code{co678}}{ Rendimento em Kg, de açúcar por tonelada de cana. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exemplo 7.3.1.4, pág. 225.
+#' @examples
+#' 
+#'library(lattice)
+#'
+#'data(CamposEg7.3.1.4)
+#'str(CamposEg7.3.1.4)
+#'
+#'boxplot(CamposEg7.3.1.4$co413, CamposEg7.3.1.4$co419, CamposEg7.3.1.4$co421, CamposEg7.3.1.4$co678,
+#'        names=c("Co 413","Co 419","Co 421", "Co 678"))
+#'
+#'kruskal.test(CamposEg7.3.1.4)
+#'
+NULL

R/CamposEx7.1.7.1.R

+#' @name CamposEx7.1.7.1
+#' @title Eficiência de Inseticidas no Feijoeiro. 
+#' @description Num experimento sobre a eficiência de inseticidas no feijoeiro, foram 
+#' obtidos resultados de produção (em Kg/ha).
+#' @format Um \code{data.frame} com 6 observações e 4 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{t1}}{ Testemunha. }
+#'
+#' \item{\code{t2}}{ Ekatin. }
+#'
+#' \item{\code{t3}}{ Diazon. }
+#'
+#' \item{\code{t4}}{ EPN. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exercício 7.1.7.1, pág. 209.
+#' @examples
+#' 
+#'library(lattice)
+#'
+#'data(CamposEx7.1.7.1)
+#'str(CamposEx7.1.7.1)
+#'
+#'boxplot(CamposEx7.1.7.1$t1, CamposEx7.1.7.1$t2, CamposEx7.1.7.1$t3, CamposEx7.1.7.1$t4,
+#'        names=c("Testemunha","Ekatin","Diazinon", "EPN"))
+#'
+#'kruskal.test(CamposEx7.1.7.1)
+#'
+NULL

R/CamposEx7.1.7.4.R

+#' @name CamposEx7.1.7.4
+#' @title Pesquisa para Testar a Eficiência de Quatro Panelas de Pressão. 
+#' @description Numa pesquisa realizada a fim de verificar a eficiência de quatro panelas de
+#' pressão, no cozimento de feijão, foram registradas as consistências do produto, após 25 
+#' minutos de cozimento.
+#' @format Um \code{data.frame} com 5 observações e 4 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{P1}}{ Consistência do produto, após 25 minutos de cozimento na panela 1. }
+#'
+#' \item{\code{P2}}{ Consistência do produto, após 25 minutos de cozimento na panela 2. }
+#'
+#' \item{\code{P3}}{ Consistência do produto, após 25 minutos de cozimento na panela 3. }
+#'
+#' \item{\code{P4}}{ Consistência do produto, após 25 minutos de cozimento na panela 4. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exercício 7.1.7.4, pág. 211.
+#' @examples
+#' 
+#'library(lattice)
+#'
+#'data(CamposEx7.1.7.4)
+#'str(CamposEx7.1.7.4)
+#'
+#'boxplot(CamposEx7.1.7.4$P1, CamposEx7.1.7.4$P2, CamposEx7.1.7.4$P3, CamposEx7.1.7.4$P4,
+#'        names=c("Panela 1","Panela 2","Panela 3", "Panela 4"))
+#'
+#'kruskal.test(CamposEx7.1.7.4)
+#'
+NULL

data-raw/CamposEg7.1.6.1.txt

+D1	D2	D3
+2212.8	2195.2	1770.3
+2025.3	2031.5	1800
+1989	1876.5	1852.8
+2232.8	1750.3	1769
+2027.8	1060.3	NA

data-raw/CamposEg7.1.6.2.txt

+A	B	C	D
+35	40	39	27
+19	35	27	12
+31	46	20	13
+15	41	29	28
+30	33	45	30

data-raw/CamposEg7.3.1.1.txt

+t1	t2	t3
+5	8.3	9.2
+6.7	9.3	8.7
+7	8.6	7.3
+6.8	9	8.2

data-raw/CamposEg7.3.1.4.txt

+co413	co419	co421	co678
+116.1	105.3	121.6	123.8
+114.4	99.9	122	122.9
+113.6	104.8	124.9	118.5
+101.6	105.1	123.3	NA
+112.7	100.2	NA	NA

data-raw/CamposEx7.1.7.1.txt

+t1	t2	t3	t4
+1451	1451	1368	1534
+1534	1575	1534	1658
+1493	1534	1534	1700
+1285	1493	1534	1700
+5763	6053	5970	6592
+1441	1513	1492	1648

data-raw/CamposEx7.1.7.4.txt

+P1	P2	P3	P4
+18	16	21	19
+19	14	20	17
+21	17	22	18
+18	15	19	20
+20	16	22	19

man/CamposEg7.1.6.1.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CamposEg7.1.6.1.R
+\name{CamposEg7.1.6.1}
+\alias{CamposEg7.1.6.1}
+\title{Influência do Tamanho do Disco na Aração}
+\format{Um \code{data.frame} com 5 observações e 3 variáveis, em que
+     
+
+\describe{
+
+\item{\code{D1}}{ Resultados parciais de "esforço de tração", em kgf,para D1. }
+
+\item{\code{D2}}{ Resultados parciais de "esforço de tração", em kgf,para D2. }
+
+\item{\code{D3}}{ Resultados parciais de "esforço de tração", em kgf,para D3. }
+
+}}
+\source{
+DE CAMPOS; HUMBERTO (1983), Exemplo 7.1.6.1, pág. 206.
+}
+\description{
+Numa pesquisa realizada pelo Dr. Aldo Duvilio Ometto, do Departamento de 
+Engenharia Rural da E.S.A. "Luiz de Queiroz", sobre a "Influencia do Tamanho do Disco de 
+Aração", foram provados três diâmetros distintos ou sejam:
+D1 = 26 cm; D2 = 28 cm; D3 = 30 cm.
+}
+\examples{
+
+library(lattice)
+
+data(CamposEg7.1.6.1)
+str(CamposEg7.1.6.1)
+
+boxplot(CamposEg7.1.6.1$D1, CamposEg7.1.6.1$D2, CamposEg7.1.6.1$D3,
+       names=c("D1","D2","D3"))
+
+kruskal.test(CamposEg7.1.6.1)
+
+}
+\keyword{TODOS}
+

man/CamposEg7.1.6.2.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CamposEg7.1.6.2.R
+\name{CamposEg7.1.6.2}
+\alias{CamposEg7.1.6.2}
+\title{Experimento de Alimentação de Porcos.}
+\format{Um \code{data.frame} com 5 observações e 4 variáveis, em que
+     
+
+\describe{
+
+\item{\code{A}}{ Aumento de peso (em Kg), utilizando a ração A. }
+
+\item{\code{B}}{ Aumento de peso (em Kg), utilizando a ração B. }
+
+\item{\code{C}}{ Aumento de peso (em Kg), utilizando a ração C. }
+
+\item{\code{D}}{ Aumento de peso (em Kg), utilizando a ração D. }
+
+}}
+\source{
+DE CAMPOS; HUMBERTO (1983), Exemplo 7.1.6.2, pág. 207.
+}
+\description{
+PIMENTEL GOMES (1978) apresenta um exemplo de um experimento (fictício) de 
+alimentação de porcos, em que se usaram quadros rações (A,B,C e D), cada uma fornecida a 
+cinco animais, escolhidos ao acaso.
+}
+\examples{
+
+library(lattice)
+
+data(CamposEg7.1.6.2)
+str(CamposEg7.1.6.2)
+
+boxplot(CamposEg7.1.6.2$A, CamposEg7.1.6.2$B, CamposEg7.1.6.2$C, CamposEg7.1.6.2$D,
+       names=c("A","B","C","D"))
+
+kruskal.test(CamposEg7.1.6.2)
+
+}
+\keyword{TODOS}
+