diff --git a/R/ZimmermannTb12.13.R b/R/ZimmermannTb12.13.R index dffb7545de59526a1ad409f9a2219c5f032ed215..26fecb24ad272b57995c7c7e455c12888beb5134 100644 --- a/R/ZimmermannTb12.13.R +++ b/R/ZimmermannTb12.13.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab12.13 +#' @name ZimmermannTb12.13 #' @title Dados da proporção de insetos infectados #' @description Dados do ensaio 1 de um experimento em DBC que estudou a #' patogenicidade de fungos as percevejo do grão de @@ -25,13 +25,13 @@ #' #' library(lattice) #' -#' data(ZimmermannTab12.13) +#' data(ZimmermannTb12.13) #' -#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.13, +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.13, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Proporção de insetos infectados") #' -#' aggregate(prod ~ trat, data = ZimmermannTab12.13, +#' aggregate(prod ~ trat, data = ZimmermannTb12.13, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb12.14.R b/R/ZimmermannTb12.14.R index 592f084c4a12cc69224e7934fc4298ff1708b2b2..cf2f85076746a7eaf09c2543171d0e5d12283413 100644 --- a/R/ZimmermannTb12.14.R +++ b/R/ZimmermannTb12.14.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab12.14 +#' @name ZimmermannTb12.14 #' @title Dados da proporção de insetos infectados #' @description Dados do ensaio 2 de um experimento em DBC que estudou a #' patogenicidade de fungos as percevejo do grão de @@ -25,13 +25,13 @@ #' #' library(lattice) #' -#' data(ZimmermannTab12.14) +#' data(ZimmermannTb12.14) #' -#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.14, +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.14, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Proporção de insetos infectados") #' -#' aggregate(prod ~ trat, data = ZimmermannTab12.14, +#' aggregate(prod ~ trat, data = ZimmermannTb12.14, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb12.19.R b/R/ZimmermannTb12.19.R index 2586febdb1907cae0f88994e9d144c01138d28b2..b35a3fce0512794ae31e309d1ace0d57d2e4527b 100644 --- a/R/ZimmermannTb12.19.R +++ b/R/ZimmermannTb12.19.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab12.19 +#' @name ZimmermannTb12.19 #' @title Dados de produtividade de grãos de feijão #' @description Dados do ensaio 1 de um experimento em DBC de competição #' de cultivares de feijão do grupo preto. Este ensaio foi @@ -26,13 +26,13 @@ #' #' library(lattice) #' -#' data(ZimmermannTab12.19) +#' data(ZimmermannTb12.19) #' -#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.19, +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.19, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Produtividade de grãos") #' -#' aggregate(prod ~ trat, data = ZimmermannTab12.19, +#' aggregate(prod ~ trat, data = ZimmermannTb12.19, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb12.20.R b/R/ZimmermannTb12.20.R index 5c0140398ca25730b57298ccfcb30080ab973816..038d28358eda8de3e5ab0d5573bb99efba4ee801 100644 --- a/R/ZimmermannTb12.20.R +++ b/R/ZimmermannTb12.20.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab12.20 +#' @name ZimmermannTb12.20 #' @title Dados de produtividade de grãos de feijão #' @description Dados do ensaio 2 de um experimento em DBC de competição #' de cultivares de feijão do grupo preto. Este ensaio foi @@ -26,13 +26,13 @@ #' #' library(lattice) #' -#' data(ZimmermannTab12.20) +#' data(ZimmermannTb12.20) #' -#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.20, +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.20, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Produtividade de grãos") #' -#' aggregate(prod ~ trat, data = ZimmermannTab12.20, +#' aggregate(prod ~ trat, data = ZimmermannTb12.20, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb12.7.R b/R/ZimmermannTb12.7.R index bad4050e27c26e5567fe8d381d72d442262525d8..d455f87003ebbdd3d72ee222669d87991818e113 100644 --- a/R/ZimmermannTb12.7.R +++ b/R/ZimmermannTb12.7.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab12.7 +#' @name ZimmermannTb12.7 #' @title Dados de área sob a curva do progresso de uma doença #' @description Dados de um ensaio que avaliou as cultivares para a área #' foliar atacada por brusone (Pyricularia Orizae L.) em @@ -26,13 +26,13 @@ #' #' library(lattice) #' -#' data(ZimmermannTab12.7) +#' data(ZimmermannTb12.7) #' -#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.7, +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.7, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Área sob a curva do progresso da doença") #' -#' aggregate(prod ~ trat, data = ZimmermannTab12.7, +#' aggregate(prod ~ trat, data = ZimmermannTb12.7, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb12.8.R b/R/ZimmermannTb12.8.R index c92a814c1155d993ff683143f5d5cfe5376ecd4e..01b28f625c146c2fcee9d0e9c4a71fa52b6143b3 100644 --- a/R/ZimmermannTb12.8.R +++ b/R/ZimmermannTb12.8.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab12.8 +#' @name ZimmermannTb12.8 #' @title Dados de área sob a curva do progresso de uma doença #' @description Dados de um ensaio que avaliou as cultivares para a área #' foliar atacada por brusone (Pyricularia Orizae L.) em @@ -26,13 +26,13 @@ #' #' library(lattice) #' -#' data(ZimmermannTab12.8) +#' data(ZimmermannTb12.8) #' -#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.8, +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.8, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Área sob a curva do progresso da doença") #' -#' aggregate(prod ~ trat, data = ZimmermannTab12.8, +#' aggregate(prod ~ trat, data = ZimmermannTb12.8, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb4.11.R b/R/ZimmermannTb4.11.R index b650d404852a41a0f068ff3c437f879b5b9658ea..54c7eacbda6b949978a08892f1074ebfae484545 100644 --- a/R/ZimmermannTb4.11.R +++ b/R/ZimmermannTb4.11.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab4.11 +#' @name ZimmermannTb4.11 #' @title Estudo sobre alturas médias de perfilhos #' @description Dados de um ensaio com dez tratamentos, quatro blocos e #' cinco amostras tomadas ao acaso, de alturas médias de @@ -25,16 +25,16 @@ #' #' library(lattice) #' -#' data(ZimmermannTab4.11) +#' data(ZimmermannTb4.11) #' #' levelplot(prod~amostra+bloco, -#' data=ZimmermannTab4.11, aspect="iso") +#' data=ZimmermannTb4.11, aspect="iso") #' -#' xyplot(prod ~ trat | amostra, groups = bloco, data = ZimmermannTab4.11, +#' xyplot(prod ~ trat | amostra, groups = bloco, data = ZimmermannTb4.11, #' type=c("p","a"), #' xlab = "Tratamentos", #' ylab = "Altura média de perfilhos") #' -#' aggregate(prod ~ trat, data = ZimmermannTab4.11, +#' aggregate(prod ~ trat, data = ZimmermannTb4.11, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file diff --git a/R/ZimmermannTb4.4.R b/R/ZimmermannTb4.4.R index 3b6ae7affc414b2ad62501f8b5d7165d88dc8728..42a900fc896e2d1668e860cf764bfd060b9ff8d1 100644 --- a/R/ZimmermannTb4.4.R +++ b/R/ZimmermannTb4.4.R @@ -1,4 +1,4 @@ -#' @name ZimmermannTab4.4 +#' @name ZimmermannTb4.4 #' @title Estudo sobre produtividade de grãos de feijão #' @description Dados de um ensaio de competição de cultivares, em blocos #' completos ao acaso, da produção de grãos de feijão em kg/ha. @@ -23,12 +23,12 @@ #' #' library(lattice) #' -#' data(ZimmermannTab4.4) +#' data(ZimmermannTb4.4) #' -#' xyplot(prod ~ trat, data= ZimmermannTab4.4, type="o", jitter.x=TRUE, +#' xyplot(prod ~ trat, data= ZimmermannTb4.4, type="o", jitter.x=TRUE, #' groups = bloco, xlab="Tratamento", ylab="Produção de feijão", #' main="Experimento de competição de cultivares") #' -#' aggregate(prod ~ trat, data = ZimmermannTab4.4, +#' aggregate(prod ~ trat, data = ZimmermannTb4.4, #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) NULL \ No newline at end of file