diff --git a/R/CamposEg7.1.6.1.R b/R/CamposEg7.1.6.1.R new file mode 100644 index 0000000000000000000000000000000000000000..e4525b286565d7de42572d8bd8eb126f5ac42759 --- /dev/null +++ b/R/CamposEg7.1.6.1.R @@ -0,0 +1,33 @@ +#' @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 diff --git a/R/CamposEg7.1.6.2.R b/R/CamposEg7.1.6.2.R new file mode 100644 index 0000000000000000000000000000000000000000..f03e20059c27efd4bae3551ec5e7b3948c316fcc --- /dev/null +++ b/R/CamposEg7.1.6.2.R @@ -0,0 +1,34 @@ +#' @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 diff --git a/R/CamposEg7.3.1.1.R b/R/CamposEg7.3.1.1.R new file mode 100644 index 0000000000000000000000000000000000000000..32bb2eed96a205c4060918e67b6e1cbd682190ae --- /dev/null +++ b/R/CamposEg7.3.1.1.R @@ -0,0 +1,32 @@ +#' @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 diff --git a/R/CamposEg7.3.1.4.R b/R/CamposEg7.3.1.4.R new file mode 100644 index 0000000000000000000000000000000000000000..a6d9108263fb83719e62d483e7ed8051f160ab57 --- /dev/null +++ b/R/CamposEg7.3.1.4.R @@ -0,0 +1,33 @@ +#' @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 diff --git a/R/CamposEx7.1.7.1.R b/R/CamposEx7.1.7.1.R new file mode 100644 index 0000000000000000000000000000000000000000..fdef082a161988e50b3041669415f7aa2e984ec2 --- /dev/null +++ b/R/CamposEx7.1.7.1.R @@ -0,0 +1,33 @@ +#' @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 diff --git a/R/CamposEx7.1.7.4.R b/R/CamposEx7.1.7.4.R new file mode 100644 index 0000000000000000000000000000000000000000..87662540cead9b299039dc271e7278502976d7c4 --- /dev/null +++ b/R/CamposEx7.1.7.4.R @@ -0,0 +1,34 @@ +#' @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 diff --git a/data-raw/CamposEg7.1.6.1.txt b/data-raw/CamposEg7.1.6.1.txt new file mode 100644 index 0000000000000000000000000000000000000000..8571f4f4ae5bdd51bd2cb43e37f098471d3816a1 --- /dev/null +++ b/data-raw/CamposEg7.1.6.1.txt @@ -0,0 +1,6 @@ +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 diff --git a/data-raw/CamposEg7.1.6.2.txt b/data-raw/CamposEg7.1.6.2.txt new file mode 100644 index 0000000000000000000000000000000000000000..69caa91ace9582553d865ac97b5fa9a6c79d43f8 --- /dev/null +++ b/data-raw/CamposEg7.1.6.2.txt @@ -0,0 +1,6 @@ +A B C D +35 40 39 27 +19 35 27 12 +31 46 20 13 +15 41 29 28 +30 33 45 30 diff --git a/data-raw/CamposEg7.3.1.1.txt b/data-raw/CamposEg7.3.1.1.txt new file mode 100644 index 0000000000000000000000000000000000000000..c8cce696040487c16972fc8d1a72e38c434104c1 --- /dev/null +++ b/data-raw/CamposEg7.3.1.1.txt @@ -0,0 +1,5 @@ +t1 t2 t3 +5 8.3 9.2 +6.7 9.3 8.7 +7 8.6 7.3 +6.8 9 8.2 diff --git a/data-raw/CamposEg7.3.1.4.txt b/data-raw/CamposEg7.3.1.4.txt new file mode 100644 index 0000000000000000000000000000000000000000..4ff22abf8300943d3dac6178f28da1158671cd6c --- /dev/null +++ b/data-raw/CamposEg7.3.1.4.txt @@ -0,0 +1,6 @@ +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 diff --git a/data-raw/CamposEx7.1.7.1.txt b/data-raw/CamposEx7.1.7.1.txt new file mode 100644 index 0000000000000000000000000000000000000000..e50fc1608c97a7577f3cd13afbf06c302c14437c --- /dev/null +++ b/data-raw/CamposEx7.1.7.1.txt @@ -0,0 +1,7 @@ +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 diff --git a/data-raw/CamposEx7.1.7.4.txt b/data-raw/CamposEx7.1.7.4.txt new file mode 100644 index 0000000000000000000000000000000000000000..bdd69e3e58704e723cf3cd48b65465bbdc24623e --- /dev/null +++ b/data-raw/CamposEx7.1.7.4.txt @@ -0,0 +1,6 @@ +P1 P2 P3 P4 +18 16 21 19 +19 14 20 17 +21 17 22 18 +18 15 19 20 +20 16 22 19 diff --git a/data/CamposEg7.1.6.1.rda b/data/CamposEg7.1.6.1.rda new file mode 100644 index 0000000000000000000000000000000000000000..266a1d6463147739b69561d556016804e9867ec2 Binary files /dev/null and b/data/CamposEg7.1.6.1.rda differ diff --git a/data/CamposEg7.1.6.2.rda b/data/CamposEg7.1.6.2.rda new file mode 100644 index 0000000000000000000000000000000000000000..9531f70f145e2398bcca27badcedf12cfb125bc8 Binary files /dev/null and b/data/CamposEg7.1.6.2.rda differ diff --git a/data/CamposEg7.3.1.1.rda b/data/CamposEg7.3.1.1.rda new file mode 100644 index 0000000000000000000000000000000000000000..b010eb5261ad2132f7bcaccc07817052ce05180c Binary files /dev/null and b/data/CamposEg7.3.1.1.rda differ diff --git a/data/CamposEg7.3.1.4.rda b/data/CamposEg7.3.1.4.rda new file mode 100644 index 0000000000000000000000000000000000000000..64f613564302428022b6a98c41de23758bd22167 Binary files /dev/null and b/data/CamposEg7.3.1.4.rda differ diff --git a/data/CamposEx7.1.7.1.rda b/data/CamposEx7.1.7.1.rda new file mode 100644 index 0000000000000000000000000000000000000000..c145372eed7f535b4dd9da65909736206c1646a9 Binary files /dev/null and b/data/CamposEx7.1.7.1.rda differ diff --git a/data/CamposEx7.1.7.4.rda b/data/CamposEx7.1.7.4.rda new file mode 100644 index 0000000000000000000000000000000000000000..28585b386a5183390782471c2537c75cdff1fcab Binary files /dev/null and b/data/CamposEx7.1.7.4.rda differ diff --git a/man/CamposEg7.1.6.1.Rd b/man/CamposEg7.1.6.1.Rd new file mode 100644 index 0000000000000000000000000000000000000000..c81e88c49e4436a7025f14f2578a5d185a4fc1c2 --- /dev/null +++ b/man/CamposEg7.1.6.1.Rd @@ -0,0 +1,41 @@ +% 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} + diff --git a/man/CamposEg7.1.6.2.Rd b/man/CamposEg7.1.6.2.Rd new file mode 100644 index 0000000000000000000000000000000000000000..d0a3ed8daad92b41cf1a408c1f9690d4b950eacb --- /dev/null +++ b/man/CamposEg7.1.6.2.Rd @@ -0,0 +1,42 @@ +% 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} + diff --git a/man/CamposEg7.3.1.1.Rd b/man/CamposEg7.3.1.1.Rd new file mode 100644 index 0000000000000000000000000000000000000000..67acba7148b64a2a973f459b35a26f4e2906d444 --- /dev/null +++ b/man/CamposEg7.3.1.1.Rd @@ -0,0 +1,40 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/CamposEg7.3.1.1.R +\name{CamposEg7.3.1.1} +\alias{CamposEg7.3.1.1} +\title{Pesquisa Sobre Qualidade de Vinho.} +\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. } + +}} +\source{ +DE CAMPOS; HUMBERTO (1983), Exemplo 7.3.1.1, pág. 221. +} +\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. +} +\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) + +} +\keyword{TODOS} + diff --git a/man/CamposEg7.3.1.4.Rd b/man/CamposEg7.3.1.4.Rd new file mode 100644 index 0000000000000000000000000000000000000000..a569242feddb2be5cb258da002421a4e982a46e4 --- /dev/null +++ b/man/CamposEg7.3.1.4.Rd @@ -0,0 +1,41 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/CamposEg7.3.1.4.R +\name{CamposEg7.3.1.4} +\alias{CamposEg7.3.1.4} +\title{Variedades de Cana-de-açúcar.} +\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. } + +}} +\source{ +DE CAMPOS; HUMBERTO (1983), Exemplo 7.3.1.4, pág. 225. +} +\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. +} +\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) + +} +\keyword{TODOS} + diff --git a/man/CamposEx7.1.7.1.Rd b/man/CamposEx7.1.7.1.Rd new file mode 100644 index 0000000000000000000000000000000000000000..ee1ee46717a3e18efc20ee4e5d81a39bd1224e52 --- /dev/null +++ b/man/CamposEx7.1.7.1.Rd @@ -0,0 +1,41 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/CamposEx7.1.7.1.R +\name{CamposEx7.1.7.1} +\alias{CamposEx7.1.7.1} +\title{Eficiência de Inseticidas no Feijoeiro.} +\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. } + +}} +\source{ +DE CAMPOS; HUMBERTO (1983), Exercício 7.1.7.1, pág. 209. +} +\description{ +Num experimento sobre a eficiência de inseticidas no feijoeiro, foram +obtidos resultados de produção (em Kg/ha). +} +\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) + +} +\keyword{TODOS} + diff --git a/man/CamposEx7.1.7.4.Rd b/man/CamposEx7.1.7.4.Rd new file mode 100644 index 0000000000000000000000000000000000000000..78daed4f98d347d6c169b8480b71cd8ba4dcc441 --- /dev/null +++ b/man/CamposEx7.1.7.4.Rd @@ -0,0 +1,42 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/CamposEx7.1.7.4.R +\name{CamposEx7.1.7.4} +\alias{CamposEx7.1.7.4} +\title{Pesquisa para Testar a Eficiência de Quatro Panelas de Pressão.} +\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. } + +}} +\source{ +DE CAMPOS; HUMBERTO (1983), Exercício 7.1.7.4, pág. 211. +} +\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. +} +\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) + +} +\keyword{TODOS} +