Merge branch 'walmes8' into devel

Conflicts:
	.build_package.R - Manteve-se a instalação de pacotes np
                           diretório ~/R-test/

R/BanzattoQd1.2.3.R

 #' @name BanzattoQd1.2.3
 #' @title Diâmetro à Altura do Peito de \emph{Eucalyptus saligna}
-#' @description Valores de diâmentro à altura do peito (DAP, cm) de uma
+#' @description Valores de diâmetro à altura do peito (DAP, cm) de uma
 #'     amostra aleatória de árvores de \emph{Eucalyptus saligna} de um
 #'     povoamento com 15 anos de idade.
 #' @format Um vetor numérico com 20 elementos.

R/BanzattoQd3.2.1.R

@@ -10,7 +10,7 @@
 #' \describe{
 #'
 #' \item{trat}{Fator de níveis nominais. Tratamento aplicado para
-#'     controle do púlgão.}
+#'     controle do pulgão.}
 #'
 #' \item{rept}{Número inteiro que identifica as repetições de cada
 #'     tratamento.}

R/BanzattoQd3.4.1.R

@@ -32,7 +32,7 @@
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
 #'
 #' xyplot(prod ~ cult, data = BanzattoQd3.4.1,
-#'        xlab = "Cultivares de madioca",
+#'        xlab = "Cultivares de mandioca",
 #'        ylab = expression(Produtividade~de~mandioca~(t~ha^{-1})))
 #'
 NULL

R/BanzattoQd3.7.1.R

@@ -35,7 +35,7 @@
 #'
 #' xyplot(alt ~ comp, data = BanzattoQd3.7.1,
 #'        xlab = expression(
-#'            Composição~do~susbtrato~para~italic("Pinus oocarpa")),
+#'            Composição~do~substrato~para~italic("Pinus oocarpa")),
 #'        ylab = expression(Alturas~médias~60~dias~após~semeadura~(cm)))
 #'
 NULL

R/BanzattoQd4.5.2.R

+#' @name BanzattoQd4.5.2
+#' @title Efeito do Promalin sobre Furtos de Macieira
+#' @description Resultados de um experimento instalado na Fazenda
+#'     Chapadão, no município de Angatuba - SP. O delineamento
+#'     experimental foi o de blocos casualizados, sendo as parcelas
+#'     constituídas de 4 plantas espaçadas de 6 x 7 metros, com 12 anos
+#'     de idade na época da instalação do experimento.
+#' @format Um \code{data.frame} com 20 observações e 3 variáveis.
+#'
+#' \describe{
+#'
+#' \item{\code{promalin}}{Fator de níveis nominais que representa a
+#'     aplicação de promalin. Os níveis são a dose de promalin (ppm)
+#'     aplicado em plena floração (12.5, 25, e 50), na floração e na
+#'     frutificação (12.5 + 12.5) e a testemunha (sem aplicação).}
+#'
+#' \item{\code{bloco}}{São os blocos do experimento, considerados para
+#'     fazer controle local.}
+#'
+#' \item{\code{peso}}{Peso (g) médio baseado em um total de 250 frutos
+#'     por parcela.}
+#'
+#' }
+#' @keywords DBC
+#' @source Banzatto, D. A., & Kronka, S. D. (2013). Experimentação
+#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.5.2
+#'     pág. 84)
+#'
+#' Mestriner,  J. C. (1980). Estudos dos efeitos do promalin sobre
+#'     frutos de macieiras (\emph{Malus} ssp) cultivares Brasil e
+#'     Rainha. Trabalho de Conclusão de Curso (Graduação em Agronomia) -
+#'     Faculdade de Ciências Agrárias e Veterinárias,  Universidade
+#'     Estadual Paulista, Jaboticabal - SP.
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(BanzattoQd4.5.2)
+#'
+#' addmargins(with(BanzattoQd4.5.2,
+#'                 tapply(X = peso,
+#'                        INDEX = list(promalin, bloco),
+#'                        FUN = sum)))
+#'
+#' xyplot(peso ~ bloco, data = BanzattoQd4.5.2,
+#'        groups = promalin, type = "b",
+#'        xlab = "Bloco",
+#'        ylab = "Peso médio dos frutos (g)",
+#'        auto.key = list(title = "Forma de aplicação do Promalin",
+#'                        cex.title = 1, columns = 2))
+NULL

R/BanzattoQd4.7.1.R

+#' @name BanzattoQd4.7.1
+#' @title Comparação de Métodos de Semeadura do Mamoeiro
+#' @description Estudo realizado em Jaboticabal - SP por Ruiz (1977)
+#'     que comparou métodos de semeadura no mamoeiro. O experimento foi
+#'     instalado em delineamento de blocos casualizados, com 4
+#'     repetições, avaliando 3 métodos de semeadura. Foram avaliadas
+#'     duas unidades experimentais por método em cada bloco.
+#' @format Um \code{data.frame} com 24 observações e 3 variáveis.
+#'
+#' \describe{
+#'
+#' \item{\code{bloco}}{Blocos usados para controle local.}
+#'
+#' \item{\code{semead}}{Métodos de semeadura do mamoeiro, com 3 níveis:
+#'     1) semeadura direta no campo, 2 semeadura em recipientes a pleno
+#'     sol e 3) semeadura em recipientes no ripado.}
+#'
+#' \item{\code{altura}}{Alturas médias (cm) das plantas de mamoeiro aos
+#'     147 dias após a semeadura.}
+#'
+#' }
+#' @keywords DBC
+#' @source Banzatto, D. A., & Kronka, S. D. (2013). Experimentação
+#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.7.1
+#'     pág. 93)
+#'
+#' Ruiz, P. R. N. (1977). Estudo comparativo entre diferentes métodos de
+#'     semeadura na cultura do mamoeiro (\emph{Carica papaya}
+#'     L.). Trabalho de Conclusão de Curso (Graduação em Agronomia) -
+#'     Faculdade de Ciências Agrárias e Veterinárias, Universidade
+#'     Estadual Paulista, Jaboticabal - SP.
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(BanzattoQd4.7.1)
+#'
+#' addmargins(with(BanzattoQd4.7.1,
+#'                 tapply(X = altura,
+#'                        INDEX = list(semead, bloco),
+#'                        FUN = sum)))
+#'
+#' xyplot(altura ~ semead, data = BanzattoQd4.7.1,
+#'        groups = bloco, type = c("p", "a"),
+#'        xlab = "Método de semeadura de mamoeiro",
+#'        ylab = "Peso médio dos frutos (g)",
+#'        auto.key = list(title = "Bloco", cex.title = 1, columns = 2))
+#'
+NULL

R/CostaTb4.R

@@ -20,8 +20,8 @@
 #' }
 #' @keywords DIC
 #' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica: Embrapa
-#'     Agrobiologia. (pág. 58)
+#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
+#'     Agrobiologia. (Tabela 4 pág. 58)
 #' @examples
 #'
 #' library(lattice)

R/CostaTb6.R

+#' @name CostaTb6
+#' @title Efeito da Cobertura Morta no Peso Seco de Brócolis
+#' @description Experimento instalado em delineamento de blocos
+#'     casualizados para estudar o efeito de tipos de cobertura morta no
+#'     peso seco de brócolis.
+#' @format Um \code{data.frame} com 20 observações e 3 variáveis.
+#' \describe{
+#'
+#' \item{\code{cobert}}{Fator nominal com níveis de cobertura morta
+#'     aplicada sobre o solo onde foi cultivado o brócolis: cobertura
+#'     com sorgo, com crotalária, com milheto e com a vegetação
+#'     espontânea.}
+#'
+#' \item{\code{bloco}}{Fator de níveis nominais considerado para
+#'     controle local, possivelmente os canteiros da horta, com 5
+#'     níveis.}
+#'
+#' \item{\code{peso}}{Variável resposta contínua, peso seco (g
+#'     parcela\eqn{^{-1}}) de brócolis.}
+#'
+#' }
+#' @keywords DBC
+#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
+#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
+#'     Agrobiologia. (Tabela 6 pág. 63)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(CostaTb6)
+#'
+#' with(CostaTb6, addmargins(tapply(X = peso,
+#'                                  INDEX = list(bloco, cobert),
+#'                                  FUN = sum)))
+#'
+#' xyplot(peso ~ cobert, data = CostaTb6,
+#'        groups = bloco, type = "b",
+#'        xlab = "Tipos de cobertura do solo",
+#'        ylab = expression("Peso seco de brócolis"~(g~parcela^{-1})),
+#'        auto.key = list(corner = c(0.1, 0.1), columns = 2,
+#'                        title = "Blocos", cex.title = 1))
+#'
+NULL

data-raw/BanzattoQd4.5.2.txt

+promalin	bloco	peso
+12.5	I	142.4
+25.0	I	139.9
+50.0	I	140.7
+12.5+12.5	I	150.9
+Testemunha	I	153.5
+12.5	II	144.8
+25.0	II	137.8
+50.0	II	134.1
+12.5+12.5	II	135.8
+Testemunha	II	165
+12.5	III	145.2
+25.0	III	144.4
+50.0	III	136.1
+12.5+12.5	III	137
+Testemunha	III	151.8
+12.5	IV	138.9
+25.0	IV	130.6
+50.0	IV	144.1
+12.5+12.5	IV	136.4
+Testemunha	IV	150.2

data-raw/BanzattoQd4.7.1.txt

+rept	bloco	semead	altura
+1	I	Direta no campo	136.1
+2	I	Direta no campo	105.3
+1	II	Direta no campo	98.8
+2	II	Direta no campo	86.8
+1	III	Direta no campo	108.8
+2	III	Direta no campo	109.7
+1	IV	Direta no campo	92.4
+2	IV	Direta no campo	70.5
+1	I	Recip. ao sol	79.8
+2	I	Recip. ao sol	77.9
+1	II	Recip. ao sol	56.3
+2	II	Recip. ao sol	64.4
+1	III	Recip. ao sol	66.9
+2	III	Recip. ao sol	62.1
+1	IV	Recip. ao sol	43.8
+2	IV	Recip. ao sol	36.3
+1	I	Recip. ripado	64
+2	I	Recip. ripado	59.5
+1	II	Recip. ripado	65.2
+2	II	Recip. ripado	61.9
+1	III	Recip. ripado	77.1
+2	III	Recip. ripado	55.8
+1	IV	Recip. ripado	66.1
+2	IV	Recip. ripado	43.7

data-raw/CostaTb6.txt

+cobert	bloco	peso
+sorgo	1	72.8
+crotalária	1	69
+milheto	1	45.3
+espontânea	1	66.5
+sorgo	2	58.3
+crotalária	2	64.1
+milheto	2	60.9
+espontânea	2	67.4
+sorgo	3	50.4
+crotalária	3	72.1
+milheto	3	67.2
+espontânea	3	59.3
+sorgo	4	51.6
+crotalária	4	73.6
+milheto	4	66.2
+espontânea	4	27.4
+sorgo	5	59
+crotalária	5	65
+milheto	5	52
+espontânea	5	39

man/BanzattoQd1.2.3.Rd

@@ -9,7 +9,7 @@ Banzatto, D. A., & Kronka, S. D. (2013). Experimentação
     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 1.2.3 pág. 3)
 }
 \description{
-Valores de diâmentro à altura do peito (DAP, cm) de uma
+Valores de diâmetro à altura do peito (DAP, cm) de uma
     amostra aleatória de árvores de \emph{Eucalyptus saligna} de um
     povoamento com 15 anos de idade.
 }

man/BanzattoQd3.2.1.Rd

@@ -8,7 +8,7 @@
 \describe{
 
 \item{trat}{Fator de níveis nominais. Tratamento aplicado para
-    controle do púlgão.}
+    controle do pulgão.}
 
 \item{rept}{Número inteiro que identifica as repetições de cada
     tratamento.}

man/BanzattoQd3.4.1.Rd

@@ -38,7 +38,7 @@ aggregate(prod ~ cult,  data = BanzattoQd3.4.1,
           FUN = function(x) { c(mean = mean(x), var = var(x)) })
 
 xyplot(prod ~ cult, data = BanzattoQd3.4.1,
-       xlab = "Cultivares de madioca",
+       xlab = "Cultivares de mandioca",
        ylab = expression(Produtividade~de~mandioca~(t~ha^{-1})))
 
 }

man/BanzattoQd3.7.1.Rd

@@ -41,7 +41,7 @@ aggregate(alt ~ comp,  data = BanzattoQd3.7.1,
 
 xyplot(alt ~ comp, data = BanzattoQd3.7.1,
        xlab = expression(
-           Composição~do~susbtrato~para~italic("Pinus oocarpa")),
+           Composição~do~substrato~para~italic("Pinus oocarpa")),
        ylab = expression(Alturas~médias~60~dias~após~semeadura~(cm)))
 
 }

man/BanzattoQd4.5.2.Rd

+% Generated by roxygen2 (4.1.1): do not edit by hand
+% Please edit documentation in R/BanzattoQd4.5.2.R
+\name{BanzattoQd4.5.2}
+\alias{BanzattoQd4.5.2}
+\title{Efeito do Promalin sobre Furtos de Macieira}
+\format{Um \code{data.frame} com 20 observações e 3 variáveis.
+
+\describe{
+
+\item{\code{promalin}}{Fator de níveis nominais que representa a
+    aplicação de promalin. Os níveis são a dose de promalin (ppm)
+    aplicado em plena floração (12.5, 25, e 50), na floração e na
+    frutificação (12.5 + 12.5) e a testemunha (sem aplicação).}
+
+\item{\code{bloco}}{São os blocos do experimento, considerados para
+    fazer controle local.}
+
+\item{\code{peso}}{Peso (g) médio baseado em um total de 250 frutos
+    por parcela.}
+
+}}
+\source{
+Banzatto, D. A., & Kronka, S. D. (2013). Experimentação
+    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.5.2
+    pág. 84)
+
+Mestriner,  J. C. (1980). Estudos dos efeitos do promalin sobre
+    frutos de macieiras (\emph{Malus} ssp) cultivares Brasil e
+    Rainha. Trabalho de Conclusão de Curso (Graduação em Agronomia) -
+    Faculdade de Ciências Agrárias e Veterinárias,  Universidade
+    Estadual Paulista, Jaboticabal - SP.
+}
+\description{
+Resultados de um experimento instalado na Fazenda
+    Chapadão, no município de Angatuba - SP. O delineamento
+    experimental foi o de blocos casualizados, sendo as parcelas
+    constituídas de 4 plantas espaçadas de 6 x 7 metros, com 12 anos
+    de idade na época da instalação do experimento.
+}
+\examples{
+library(lattice)
+
+data(BanzattoQd4.5.2)
+
+addmargins(with(BanzattoQd4.5.2,
+                tapply(X = peso,
+                       INDEX = list(promalin, bloco),
+                       FUN = sum)))
+
+xyplot(peso ~ bloco, data = BanzattoQd4.5.2,
+       groups = promalin, type = "b",
+       xlab = "Bloco",
+       ylab = "Peso médio dos frutos (g)",
+       auto.key = list(title = "Forma de aplicação do Promalin",
+                       cex.title = 1, columns = 2))
+}
+\keyword{DBC}
+

man/BanzattoQd4.7.1.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/BanzattoQd4.7.1.R
+\name{BanzattoQd4.7.1}
+\alias{BanzattoQd4.7.1}
+\title{Comparação de Métodos de Semeadura do Mamoeiro}
+\format{Um \code{data.frame} com 24 observações e 3 variáveis.
+
+\describe{
+
+\item{\code{bloco}}{Blocos usados para controle local.}
+
+\item{\code{semead}}{Métodos de semeadura do mamoeiro, com 3 níveis:
+    1) semeadura direta no campo, 2 semeadura em recipientes a pleno
+    sol e 3) semeadura em recipientes no ripado.}
+
+\item{\code{altura}}{Alturas médias (cm) das plantas de mamoeiro aos
+    147 dias após a semeadura.}
+
+}}
+\source{
+Banzatto, D. A., & Kronka, S. D. (2013). Experimentação
+    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.7.1
+    pág. 93)
+
+Ruiz, P. R. N. (1977). Estudo comparativo entre diferentes métodos de
+    semeadura na cultura do mamoeiro (\emph{Carica papaya}
+    L.). Trabalho de Conclusão de Curso (Graduação em Agronomia) -
+    Faculdade de Ciências Agrárias e Veterinárias, Universidade
+    Estadual Paulista, Jaboticabal - SP.
+}
+\description{
+Estudo realizado em Jaboticabal - SP por Ruiz (1977)
+    que comparou métodos de semeadura no mamoeiro. O experimento foi
+    instalado em delineamento de blocos casualizados, com 4
+    repetições, avaliando 3 métodos de semeadura. Foram avaliadas
+    duas unidades experimentais por método em cada bloco.
+}
+\examples{
+
+library(lattice)
+
+data(BanzattoQd4.7.1)
+
+addmargins(with(BanzattoQd4.7.1,
+                tapply(X = altura,
+                       INDEX = list(semead, bloco),
+                       FUN = sum)))
+
+xyplot(altura ~ semead, data = BanzattoQd4.7.1,
+       groups = bloco, type = c("p", "a"),
+       xlab = "Método de semeadura de mamoeiro",
+       ylab = "Peso médio dos frutos (g)",
+       auto.key = list(title = "Bloco", cex.title = 1, columns = 2))
+
+}
+\keyword{DBC}
+