From b4a9614eaf1fab90b1362a158ac795b6f56f1e69 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Fri, 25 Mar 2016 16:53:01 -0300
Subject: [PATCH] Renomeia trat -> cult, Tab -> Tb.
---
R/ZimmermannTb12.19.R | 10 ++++-----
R/ZimmermannTb12.20.R | 15 +++++++------
data-raw/ZimmermannTab12.19.txt | 37 --------------------------------
data-raw/ZimmermannTab12.20.txt | 37 --------------------------------
data-raw/ZimmermannTb12.19.txt | 2 +-
data-raw/ZimmermannTb12.20.txt | 2 +-
data/ZimmermannTab12.19.rda | Bin 411 -> 0 bytes
data/ZimmermannTab12.20.rda | Bin 483 -> 0 bytes
data/ZimmermannTb12.19.rda | Bin 430 -> 442 bytes
data/ZimmermannTb12.20.rda | Bin 539 -> 526 bytes
10 files changed, 15 insertions(+), 88 deletions(-)
delete mode 100644 data-raw/ZimmermannTab12.19.txt
delete mode 100644 data-raw/ZimmermannTab12.20.txt
delete mode 100644 data/ZimmermannTab12.19.rda
delete mode 100644 data/ZimmermannTab12.20.rda
diff --git a/R/ZimmermannTb12.19.R b/R/ZimmermannTb12.19.R
index 193528b..c5da089 100644
--- a/R/ZimmermannTb12.19.R
+++ b/R/ZimmermannTb12.19.R
@@ -10,13 +10,13 @@
#'
#' \describe{
#'
-#' \item{\code{cult}}{Fator de níveis nominais. Identifica a cultivar da
-#' planta.}
+#' \item{\code{cult}}{Fator de níveis nominais. Identifica a cultivar de
+#' feijão.}
#'
#' \item{\code{bloco}}{Número inteiro que identifica o bloco da
#' observação.}
#'
-#' \item{\code{prod}}{Produtividade de grãos (kg ha\eqn{^{-1}}).}
+#' \item{\code{prod}}{Produtividade de grãos em kg ha\eqn{^{-1}}.}
#'
#' }
#' @keywords DBC
@@ -31,13 +31,13 @@
#'
#' str(ZimmermannTb12.19)
#'
-#' xyplot(prod ~ trat, data = ZimmermannTb12.19,
+#' xyplot(prod ~ cult, data = ZimmermannTb12.19,
#' groups = bloco, type = "b",
#' xlab = "Tratamentos",
#' ylab = "Produtividade de grãos",
#' scales = list(x = list(rot = 90)))
#'
-#' aggregate(prod ~ trat, data = ZimmermannTb12.19,
+#' aggregate(prod ~ cult, data = ZimmermannTb12.19,
#' FUN = function(x) { c(mean = mean(x), var = var(x)) })
#'
NULL
diff --git a/R/ZimmermannTb12.20.R b/R/ZimmermannTb12.20.R
index e0cf7ba..9996272 100644
--- a/R/ZimmermannTb12.20.R
+++ b/R/ZimmermannTb12.20.R
@@ -1,5 +1,5 @@
#' @name ZimmermannTb12.20
-#' @title Dados de produtividade de grãos de feijão
+#' @title Produtividade de Grãos de Cultivares 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
@@ -11,12 +11,13 @@
#'
#' \describe{
#'
-#' \item{\code{cult}}{Fator de níveis nominais. dentifica a cultivar da
-#' planta.}
+#' \item{\code{cult}}{Fator de níveis nominais. dentifica a cultivar de
+#' feijão.}
#'
-#' \item{\code{bloco}}{Número inteiro que identifica o bloco da observação.}
+#' \item{\code{bloco}}{Número inteiro que identifica o bloco da
+#' observação.}
#'
-#' \item{\code{prod}}{Produtividade de grãos.}
+#' \item{\code{prod}}{Produtividade de grãos em kg ha\eqn{^{-1}}.}
#'
#' }
#' @keywords DBC
@@ -29,11 +30,11 @@
#'
#' data(ZimmermannTb12.20)
#'
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.20,
+#' xyplot(prod ~ cult , groups = bloco, data = ZimmermannTb12.20,
#' type = c("p", "a"),
#' xlab = "Tratamentos",
#' ylab = "Produtividade de grãos")
#'
-#' aggregate(prod ~ trat, data = ZimmermannTb12.20,
+#' aggregate(prod ~ cult, data = ZimmermannTb12.20,
#' FUN = function(x) { c(mean = mean(x), var = var(x)) })
NULL
diff --git a/data-raw/ZimmermannTab12.19.txt b/data-raw/ZimmermannTab12.19.txt
deleted file mode 100644
index 1781cd8..0000000
--- a/data-raw/ZimmermannTab12.19.txt
+++ /dev/null
@@ -1,37 +0,0 @@
-"cult" "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
deleted file mode 100644
index 7e23b50..0000000
--- a/data-raw/ZimmermannTab12.20.txt
+++ /dev/null
@@ -1,37 +0,0 @@
-"cult" "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-raw/ZimmermannTb12.19.txt b/data-raw/ZimmermannTb12.19.txt
index a4603f9..2e8d5bb 100644
--- a/data-raw/ZimmermannTb12.19.txt
+++ b/data-raw/ZimmermannTb12.19.txt
@@ -1,4 +1,4 @@
-trat bloco prod
+cult bloco prod
CNFP 8015 1 3700
CNFP 8016 1 3600
CNFP 8017 1 3925
diff --git a/data-raw/ZimmermannTb12.20.txt b/data-raw/ZimmermannTb12.20.txt
index ddbfcd1..3e716b0 100644
--- a/data-raw/ZimmermannTb12.20.txt
+++ b/data-raw/ZimmermannTb12.20.txt
@@ -1,4 +1,4 @@
-trat bloco prod
+cult bloco prod
CNFP 8021 1 4075
CNFP 8022 1 2544.44
CNFP 8023 1 2763.89
diff --git a/data/ZimmermannTab12.19.rda b/data/ZimmermannTab12.19.rda
deleted file mode 100644
index 51e96f822aec21f50d9ce9a411f4e538f8613274..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
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-^toGW|Gx
z9E1GojC2w=i-<g3zF_8o$SLvb*o|33;tWh3-UK#kr2ISIFl)!oAR%v|ua~+Sq9hbJ
Q|Hv~)^zt|?XJKFf05wgiG5`Po
diff --git a/data/ZimmermannTab12.20.rda b/data/ZimmermannTab12.20.rda
deleted file mode 100644
index b7570dfef64fcb3c6084e4d3c8b5c7a1434bb822..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
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|XZH0n&QKlcKk7JNuosmxBW)YF6%NNW%5IH4&9lJ4WNSuMG
o!y;$aMH7D7GiN<|=H;p5dBt0sDJ!u-<wHHg)W<18%UKv001=PZ=>Px#
diff --git a/data/ZimmermannTb12.19.rda b/data/ZimmermannTb12.19.rda
index 614c9546da0c232c8a0fff8c457e666cb804df8f..cd3293929ff63a07ab4c71c9bd3c82fe9ab9bd42 100644
GIT binary patch
literal 442
zcmZ>Y%CIzaj8qGboEx^_Hv{AS|M&lYuV8RttbY*O8X9W<{eFXkBme&!EDR0|ECG%p
zj2jqzIHa^vO}<>JR6CXNm2okLt=hchD;K_!%BXZ)*3-Ts^QEoC@>lIfnF}W{97&O6
zFgeI9z$=x(a6*bf$YWB~tVFX}4JM2WCp$1Z`!bmDG??(R&e#=RJY8q`bk0wXN<pF1
zW!|a3zy5uu-|^*VmKYojx*NdwUhKgZp0tA04o-f?rpc!Y0vVgV-nmG=G%&uaQekv~
zEu?9NwTogAxBa?*)yBrlX3ePe<$a+dXu!NYtf9f{m9P8x)lFX*_*0t1SgiAl*6jPw
z#Zhwh*B#NvEq%L}tFSx}R%tPk<eV%l$tcXpb4Ylm0^f|exgBhdx%X8Yi_W}mnQ~3F
z?6;MnYns8d^Yb0w%SazedU8W3l4pX)0&SDLC{b^5T`tcO(Zwg)_a(Z1w`cQ9b*X(W
z?_9fHa+{vRWD`xDYRSo}^LckQ%v-hbf7*iUQkzx==q1%{)pa@5S1n~clf85~vvX>v
z<TQ1mPo^(tzGUOH<({1Pcv%9wPlu4s5|5Jk=eP>KGcrW~i9IRu(8;MZs`(87l{~eR
literal 430
zcmZ>Y%CIzaj8qGbe3ZsJnSt@i|NH;HS1`CR7C*S#8X9W<{ceMUBme&!EDR0|ECG%o
zj2jqzxSd@cOr%&&wj46#xiH%y(<IF!b3#gHXRlOMtFK$H*|J%-%09g&3?>(t9Wodg
z7}y$ACaHPYOt|cDaYBZ{ECyZ%p2n997feJ-*UYVs-ZAfeb7))iX6yFPS*M>Y{C4@g
z^|~E<E-qZeG?6iYag&P*fB3SM{03*|C}^^}Glj-;eXvvZ6grjgd8$LwiZJ$smhB3Y
zzn=S-c=6TbUk^JxTu$>jwj9*@?EA*elc{wQ6PrVY?c*MP@B14M9+pulldWq|U&5op
ztk^iCa{^1wnMv#hTup2&Vij`>JAGXjIGot=|71qYW^2XH?!fYDtAZtS#Lt?Yo?+f{
zRH9+m<p6_bS(V=^0s$g3zvp&soxSalM*_>jx2|{XJ5H=SyIrpLU;Exer?fWC>M`q>
zlqs_<M)>P1tp+cp&tID^EK-`=c);PJu)j*9h`CN5@9GkU7PiF+?`zdJ9}{+SKH$>y
l)LJ(vPP0KrQa~jz&trp+C5M90s)H4u#fw}m0w#ds2LSEaw{QRe
diff --git a/data/ZimmermannTb12.20.rda b/data/ZimmermannTb12.20.rda
index 2050429e34ea3f7ae7ebd0069fd123b0dbea8f7a..4eea93d80eb09c756f1bfa60d6f5bab596715259 100644
GIT binary patch
literal 526
zcmZ>Y%CIzaj8qGbOx`&qh=FnC|NsBL=P({|u6O!-u=I-k^ZR>(7+RPA|2`ohVnXYL
z2S1oNH!#l7T9DDHaB=y{iOXh5W$-dEm`L%;Eo=5=c6`OtkinK|l2J9|iem!<1h5=n
zU|?`#U`k-{RB~V9yFl5Ok%8Bcr`OnXL6w7X;DV&gWmmo$%*rsiaDm~@`48`FKbz=3
zW4JQ)U`XQ3gBC&am|5NLx;n6NUEDXxhv&JE9M8&Tt;Qn0T^yF|<-gv4zBzNQV)fj_
zg`O&1K9fr2OkA9T{sd>c26Jt`&}iEtxXIz2zc!c8YYUE&2`%bL4vV{9GO{$Nd3a7Z
z;WJ}mgZhTG)iRT+IaMO=pXCzNIOcF|?@GS)D_73qHru6Ku<|X_luaAM-Daq-=xMR3
zTf^WxTXNb2%}N*5_?@$af9&bXs<@^q^xN=2qs*R<A7-4@ys<m@BkRKRAGr1>73p*t
zR|r3EWwrUVzPx_<t>e8N92x7Z6n6+&`8nMzEIsqd#WJ%rXmxXQVP4Sulo#=KTkgAU
z(R+P7Ph91h>OIde)j}>4S)Z)^c^$FSzkFR4{q~qY<26g;^?aRP+axBr$e+1!e-Zm`
z<7+e3+8+q-jZtI}o!HE9fT^12-wMC86GGDUyo}VQly7O|pSL$`-_3<d_nviiddV>@
hbzIW6z$J5mJi`UmT81)%{YURi^b=8$c$X^D008d-<|Y6D
literal 539
zcmZ>Y%CIzaj8qGbYz(^O&cL|t|NsBra~O{}*E{_^SbD|&`Q1H146V!mf1i*LF`;$B
zgC9<u8yIKk1{h6Pka4o(<W`dm2F3*p7njXSVZQQ};exG$t%IbLiLFnTprEaZ=Zjuu
zA76%x3oZ*wxjFD;Nu{Ki9N@_8Y+_?c;Z*4|TX0sX!t<rUOhaP_HI@TzGubY*%@CZW
zxbTJIVg^>8_x0arOS`XRDG_Rz)wnuE!+l0tkA{=?B$4fhQl($ma5PNdxAbIFW!X@o
z$ULEXcg(wIveHNVPIrp1EZkDWHH}NZSLgWCO->vV4lW6t=QAoCU#Q)_6LZ%^ad)Xj
z!x|3>CrKWjBVi26#s>Z=A`%X31Pl~TKl#d1epNYQiwjTt^7l)ug_9@y$XvhGr!8Q5
zFwObwOiwpfZY9>mt2cx&yU6D>N$#z32x;JPVB9+K1AAQD;t;on`vQDEpBf!LFJxTm
zkgVA8>#-@Li}x0pm!>W{ycRLis(wi|Ywqd)wK`v)C!wS-Z&I$<S7NYa&WuR`Eo&q;
zvS#pCyEU?`lJY(qwJhh+)4eut3XVt!W?5>nEZMQ@OoYih6^4Jj+Q;O+mLB#m<eMjT
z;p<)Hm6NSF1(qI-Ymi&(*RR|8zrpum(If{64Gu;IMyurbRpKWyq=ZvNrR1KMMk(~q
w(>VKgs~vN97MI$r&;u9e-Add&lXn}_5e^44?)^gl|HPgYdFbTC>g_2506`nuJOBUy
--
GitLab