From 6005869d29b25ab4822a659cd5a610da6cbc1bc0 Mon Sep 17 00:00:00 2001 From: Bruna Wundervald <brunadaviesw@gmail.com> Date: Mon, 7 Mar 2016 11:02:39 -0300 Subject: [PATCH] Adiciona os 3 arquivos das tabelas 12.19 e 12.20 do Zimmermann --- R/ZimmermannTab12.19.R | 38 ++++++++++++++++++++++++++++++++ R/ZimmermannTab12.20.R | 38 ++++++++++++++++++++++++++++++++ data-raw/ZimmermannTab12.19.txt | 37 +++++++++++++++++++++++++++++++ data-raw/ZimmermannTab12.20.txt | 37 +++++++++++++++++++++++++++++++ data/ZimmermannTab12.19.rda | Bin 0 -> 411 bytes data/ZimmermannTab12.20.rda | Bin 0 -> 483 bytes 6 files changed, 150 insertions(+) create mode 100644 R/ZimmermannTab12.19.R create mode 100644 R/ZimmermannTab12.20.R create mode 100644 data-raw/ZimmermannTab12.19.txt create mode 100644 data-raw/ZimmermannTab12.20.txt create mode 100644 data/ZimmermannTab12.19.rda create mode 100644 data/ZimmermannTab12.20.rda diff --git a/R/ZimmermannTab12.19.R b/R/ZimmermannTab12.19.R new file mode 100644 index 0000000..2586feb --- /dev/null +++ b/R/ZimmermannTab12.19.R @@ -0,0 +1,38 @@ +#' @name ZimmermannTab12.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 +#' realizado no município de Senador Canedo (GO). Houveram +#' três cultivares testemunhas e mais seis em cada ensaio. +#' Cada experimento foi conduzido no período de inverno, sob +#' irrigação por aspersão. Os dados são relativos à +#' produtividade de grãos, em kg/ha. +#' @format Um \code{data.frame} com 36 observações e 3 variáveis +#' +#' \describe{ +#' +#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em plantas.} +#' +#' \item{bloco}{Número inteiro que identifica o bloco da observação.} +#' +#' \item{prod}{Produtividade de grãos.} +#' +#' } +#' @keywords DBC feijão plantas grãos produtividade +#' @source Zimmermann, F.J.(2004), Estatística aplicada à pesquisa +#' agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa +#' Arroz e Feijão. (pg 258) +#' @examples +#' +#' library(lattice) +#' +#' data(ZimmermannTab12.19) +#' +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.19, +#' type=c("p","a"), +#' xlab = "Tratamentos", +#' ylab = "Produtividade de grãos") +#' +#' aggregate(prod ~ trat, data = ZimmermannTab12.19, +#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +NULL \ No newline at end of file diff --git a/R/ZimmermannTab12.20.R b/R/ZimmermannTab12.20.R new file mode 100644 index 0000000..5c01403 --- /dev/null +++ b/R/ZimmermannTab12.20.R @@ -0,0 +1,38 @@ +#' @name ZimmermannTab12.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 +#' realizado no município de Santo Antonio de Goiás (GO). Houveram +#' três cultivares testemunhas e mais seis em cada ensaio. +#' Cada experimento foi conduzido no período de inverno, sob +#' irrigação por aspersão. Os dados são relativos à +#' produtividade de grãos, em kg/ha. +#' @format Um \code{data.frame} com 36 observações e 3 variáveis +#' +#' \describe{ +#' +#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em plantas.} +#' +#' \item{bloco}{Número inteiro que identifica o bloco da observação.} +#' +#' \item{prod}{Produtividade de grãos.} +#' +#' } +#' @keywords DBC feijão plantas grãos produtividade +#' @source Zimmermann, F.J.(2004), Estatística aplicada à pesquisa +#' agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa +#' Arroz e Feijão. (pg 258) +#' @examples +#' +#' library(lattice) +#' +#' data(ZimmermannTab12.20) +#' +#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTab12.20, +#' type=c("p","a"), +#' xlab = "Tratamentos", +#' ylab = "Produtividade de grãos") +#' +#' aggregate(prod ~ trat, data = ZimmermannTab12.20, +#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +NULL \ No newline at end of file diff --git a/data-raw/ZimmermannTab12.19.txt b/data-raw/ZimmermannTab12.19.txt new file mode 100644 index 0000000..4001792 --- /dev/null +++ b/data-raw/ZimmermannTab12.19.txt @@ -0,0 +1,37 @@ +"trat" "bloco" "prod" +"CNFP 8015" 1 3700 +"CNFP 8016" 1 3600 +"CNFP 8017" 1 3925 +"CNFP 8018" 1 3875 +"CNFP 8019" 1 4200 +"CNFP 8020" 1 4850 +"Diamante Negro" 1 3300 +"FT Nobre" 1 4750 +"G. Brilhante" 1 4025 +"CNFP 8015" 2 3950 +"CNFP 8016" 2 3750 +"CNFP 8017" 2 2800 +"CNFP 8018" 2 3825 +"CNFP 8019" 2 3250 +"CNFP 8020" 2 3200 +"Diamante Negro" 2 2500 +"FT Nobre" 2 4950 +"G. Brilhante" 2 3575 +"CNFP 8015" 3 4050 +"CNFP 8016" 3 3550 +"CNFP 8017" 3 2825 +"CNFP 8018" 3 4000 +"CNFP 8019" 3 3950 +"CNFP 8020" 3 3450 +"Diamante Negro" 3 4025 +"FT Nobre" 3 4700 +"G. Brilhante" 3 3125 +"CNFP 8015" 4 2950 +"CNFP 8016" 4 3000 +"CNFP 8017" 4 3600 +"CNFP 8018" 4 3825 +"CNFP 8019" 4 3375 +"CNFP 8020" 4 4200 +"Diamante Negro" 4 3950 +"FT Nobre" 4 3575 +"G. Brilhante" 4 3825 diff --git a/data-raw/ZimmermannTab12.20.txt b/data-raw/ZimmermannTab12.20.txt new file mode 100644 index 0000000..f1fc38f --- /dev/null +++ b/data-raw/ZimmermannTab12.20.txt @@ -0,0 +1,37 @@ +"trat" "bloco" "prod" +"CNFP 8021" 1 4075 +"CNFP 8022" 1 2544.44 +"CNFP 8023" 1 2763.89 +"CNFP 8024" 1 3036.11 +"CNFP 8025" 1 2591.67 +"CNFP 8026" 1 2652.78 +"Diamante Negro" 1 1913.89 +"FT Nobre" 1 3713.89 +"G. Brilhante" 1 2400 +"CNFP 8021" 2 2252.78 +"CNFP 8022" 2 3133.33 +"CNFP 8023" 2 2250 +"CNFP 8024" 2 2369.44 +"CNFP 8025" 2 1466.67 +"CNFP 8026" 2 2927.78 +"Diamante Negro" 2 1850 +"FT Nobre" 2 3158.33 +"G. Brilhante" 2 1827.78 +"CNFP 8021" 3 3388.89 +"CNFP 8022" 3 2866.67 +"CNFP 8023" 3 1941.67 +"CNFP 8024" 3 3033.33 +"CNFP 8025" 3 2813.89 +"CNFP 8026" 3 2838.89 +"Diamante Negro" 3 1988.89 +"FT Nobre" 3 3250 +"G. Brilhante" 3 3316.67 +"CNFP 8021" 4 2663.89 +"CNFP 8022" 4 2533.33 +"CNFP 8023" 4 2791.67 +"CNFP 8024" 4 2922.22 +"CNFP 8025" 4 2750 +"CNFP 8026" 4 2305.56 +"Diamante Negro" 4 2080.56 +"FT Nobre" 4 2877.78 +"G. Brilhante" 4 2669.44 diff --git a/data/ZimmermannTab12.19.rda b/data/ZimmermannTab12.19.rda new file mode 100644 index 0000000000000000000000000000000000000000..8e79ff5e260eb65e4bcd45cc609b75950bf5210c GIT binary patch literal 411 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6)E)<s6e#lhW0!k<4m z2~Fnd{lcRwDKVq9(a2%xnLQ3stZSrFm?C&q^fxw&cHC^3A=_cuFk|w*tbm#W(<Vnv zn-$EH!r73jxM<F~x;#cMF}Aj4FPPF^Fg<(0B=&-7S_YFFTL7co^fN9A7p5-J`muDG z_)}+B%R5dYe?Cp_3R+krS8mI?e9@UXJQKW3u5VU*t|E3=hW~p|R8o;=o#2G8{3)Co zLT~I18W@*uVP>A1!KZbR>B>UM1rMKWc*g2d)63Knx1Gytx8n<5Nr9@%>KuDNu}rzo zzVN!Z<JJ3(7qV*=zFcAt_@}&LpNIx;>G4N=9D6N!oYvQ|o91&)+0X8zFWl5+z2Mg7 zSKO=q&Q4PJ(xt<(cMiLk_<~>j&*p^|uK3qHle?HbM7HYFY40<>t*Z8ED-^sv1Cuy? z9E1GojC2w=i-<g3zF_8o$SLvb*o|33;tWh3-UK#kr2ISIFl)!oAR%v|ua~+Sq9hbJ Q|Hw0FPCqn#IST^=05E8(EdT%j literal 0 HcmV?d00001 diff --git a/data/ZimmermannTab12.20.rda b/data/ZimmermannTab12.20.rda new file mode 100644 index 0000000000000000000000000000000000000000..08636e500a711761305910147e8255d4beadd3af GIT binary patch literal 483 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6)E)<s6e#lhW0!k<4m z2~Fnd{nEoDAu*%1(a2%xnLQ3stZSrFm?C&q^fxw&cHC^3A=_cuFk|w*tbm#W(<Vnv zn-$EH!r73jxM<F~x;#cMF*dih7ffz1n2x<*QhUL)>;+R=0HfXXGcE}irY_O?v2>aE zQ)gGpJ5C~hK27clT391jZp*rS(V00s6TD2WZ&rJ*B6e7Y|9enWQjuq!;DoRIDV!QY zZ|n^k7?*BgW}ceCr*)C(%0kHn51(xKC*@M}vAO--YnN5B)BNoB`7L?1@bD*DvBve$ zPi3dwXfM7grc)TPX|uiC<JXDpJI^bAiAw9(<;t$`OZ;3*$NCjfAHN3F_Z&W?De%$N zSD<+LUM9`&1rcTPi}KEKcl_xx75G~G>uDK-Zb?Kar(t=d){%Rai2}8!%^k1k{^gx| zz4gN9R>fy)eHv$M|D<|l?{mdZ-TsbW=eBp~?+)7V!)p54!<VF1{GOrsO|PKk!s%6t z&vbXPmYG+5I_-VNw^h|XZH0ojXJ8Vik7JNuosmxBW)YF6%NNW%5IH4&9lJ4WNSuMG p!y;$aMH7D7GiN<|=H;p5dBt0sDJ!u-<wHHglAo)NE@xq2000ac*xCR9 literal 0 HcmV?d00001 -- GitLab