From 0a6a823b9c50a3e99b76b8c5a88d784cb01c626e Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Fri, 25 Mar 2016 16:58:03 -0300
Subject: [PATCH] Salva sem aspas, renomeia trat -> cult.
---
R/ZimmermannTb4.4.R | 9 ++-
data-raw/ZimmermannTab4.4.txt | 61 -----------------
data-raw/ZimmermannTb4.4.txt | 122 +++++++++++++++++-----------------
data/ZimmermannTab4.4.rda | Bin 404 -> 0 bytes
data/ZimmermannTb4.4.rda | Bin 550 -> 477 bytes
5 files changed, 65 insertions(+), 127 deletions(-)
delete mode 100644 data-raw/ZimmermannTab4.4.txt
delete mode 100644 data/ZimmermannTab4.4.rda
diff --git a/R/ZimmermannTb4.4.R b/R/ZimmermannTb4.4.R
index 38e994e..6753969 100644
--- a/R/ZimmermannTb4.4.R
+++ b/R/ZimmermannTb4.4.R
@@ -1,5 +1,5 @@
#' @name ZimmermannTb4.4
-#' @title Competição de cultivares de feijão
+#' @title Competição de Cultivares 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. O experimento teve quinze tratamentos (cultivares e/ou
@@ -8,8 +8,7 @@
#'
#' \describe{
#'
-#' \item{\code{cult}}{Fator de níveis nominais. Cultivar do
-#' feijão.}
+#' \item{\code{cult}}{Fator de níveis nominais. Cultivar de feijão.}
#'
#' \item{\code{bloco}}{Número inteiro que identifica o bloco da
#' observação.}
@@ -29,14 +28,14 @@
#'
#' str(ZimmermannTb4.4)
#'
-#' xyplot(prod ~ trat, data = ZimmermannTb4.4,
+#' xyplot(prod ~ cult, data = ZimmermannTb4.4,
#' groups = bloco, type = "o", jitter.x = TRUE,
#' xlab = "Cultivares",
#' ylab = expression("Produção de feijão"~(kg~ha^{-1})),
#' main = "Experimento de competição de cultivares",
#' scales = list(x = list(rot = 90)))
#'
-#' aggregate(prod ~ trat, data = ZimmermannTb4.4,
+#' aggregate(prod ~ cult, data = ZimmermannTb4.4,
#' FUN = function(x) { c(mean = mean(x), var = var(x)) })
#'
NULL
diff --git a/data-raw/ZimmermannTab4.4.txt b/data-raw/ZimmermannTab4.4.txt
deleted file mode 100644
index 1b06d1e..0000000
--- a/data-raw/ZimmermannTab4.4.txt
+++ /dev/null
@@ -1,61 +0,0 @@
-"cult" "rep" "prod"
-1 1 1112.5
-2 1 1850
-3 1 987.5
-4 1 1587.5
-5 1 2012.5
-6 1 1975
-7 1 1837.5
-8 1 1825
-9 1 2250
-10 1 562.5
-11 1 1650
-12 1 1362.5
-13 1 1600
-14 1 2162.5
-15 1 2112.5
-1 2 650
-2 2 1637.5
-3 2 1537.5
-4 2 2412.5
-5 2 2075
-6 2 1787.5
-7 2 2137.5
-8 2 2100
-9 2 2062.5
-10 2 1437.5
-11 2 1625
-12 2 862.5
-13 2 1725
-14 2 1825
-15 2 2137.5
-1 3 1037.5
-2 3 1787.5
-3 3 1600
-4 3 2100
-5 3 2087.5
-6 3 2225
-7 3 2050
-8 3 1375
-9 3 1950
-10 3 1550
-11 3 1187.5
-12 3 1225
-13 3 1750
-14 3 1950
-15 3 2450
-1 4 1362.5
-2 4 1387.5
-3 4 1262.5
-4 4 1912.5
-5 4 1862.5
-6 4 1950
-7 4 2587.5
-8 4 1450
-9 4 1637
-10 4 925
-11 4 1325
-12 4 962.5
-13 4 1337.5
-14 4 1550
-15 4 2237.5
diff --git a/data-raw/ZimmermannTb4.4.txt b/data-raw/ZimmermannTb4.4.txt
index 654633b..d674b08 100644
--- a/data-raw/ZimmermannTb4.4.txt
+++ b/data-raw/ZimmermannTb4.4.txt
@@ -1,61 +1,61 @@
-trat bloco prod
-CNFP 8015 1 1112.5
-CNFP 8016 1 1850
-CNFP 8017 1 987.5
-CNFP 8018 1 1587.5
-CNFP 8019 1 2012.5
-CNFP 8020 1 1975
-CNFP 8021 1 1837.5
-CNFP 8022 1 1825
-CNFP 8023 1 2250
-CNFP 8024 1 562.5
-CNFP 8025 1 1650
-CNFP 8026 1 1362.5
-Diamante Negro 1 1600
-FT Nobre 1 2162.5
-G. Brilhante 1 2112.5
-CNFP 8015 2 650
-CNFP 8016 2 1637.5
-CNFP 8017 2 1537.5
-CNFP 8018 2 2412.5
-CNFP 8019 2 2075
-CNFP 8020 2 1787.5
-CNFP 8021 2 2137.5
-CNFP 8022 2 2100
-CNFP 8023 2 2062.5
-CNFP 8024 2 1437.5
-CNFP 8025 2 1625
-CNFP 8026 2 862.5
-Diamante Negro 2 1725
-FT Nobre 2 1825
-G. Brilhante 2 2137.5
-CNFP 8015 3 1037.5
-CNFP 8016 3 1787.5
-CNFP 8017 3 1600
-CNFP 8018 3 2100
-CNFP 8019 3 2087.5
-CNFP 8020 3 2225
-CNFP 8021 3 2050
-CNFP 8022 3 1375
-CNFP 8023 3 1950
-CNFP 8024 3 1550
-CNFP 8025 3 1187.5
-CNFP 8026 3 1225
-Diamante Negro 3 1750
-FT Nobre 3 1950
-G. Brilhante 3 2450
-CNFP 8015 4 1362.5
-CNFP 8016 4 1387.5
-CNFP 8017 4 1262.5
-CNFP 8018 4 1912.5
-CNFP 8019 4 1862.5
-CNFP 8020 4 1950
-CNFP 8021 4 2587.5
-CNFP 8022 4 1450
-CNFP 8023 4 1637
-CNFP 8024 4 925
-CNFP 8025 4 1325
-CNFP 8026 4 962.5
-Diamante Negro 4 1337.5
-FT Nobre 4 1550
-G. Brilhante 4 2237.5
+cult bloco prod
+1 1 1112.5
+2 1 1850
+3 1 987.5
+4 1 1587.5
+5 1 2012.5
+6 1 1975
+7 1 1837.5
+8 1 1825
+9 1 2250
+10 1 562.5
+11 1 1650
+12 1 1362.5
+13 1 1600
+14 1 2162.5
+15 1 2112.5
+1 2 650
+2 2 1637.5
+3 2 1537.5
+4 2 2412.5
+5 2 2075
+6 2 1787.5
+7 2 2137.5
+8 2 2100
+9 2 2062.5
+10 2 1437.5
+11 2 1625
+12 2 862.5
+13 2 1725
+14 2 1825
+15 2 2137.5
+1 3 1037.5
+2 3 1787.5
+3 3 1600
+4 3 2100
+5 3 2087.5
+6 3 2225
+7 3 2050
+8 3 1375
+9 3 1950
+10 3 1550
+11 3 1187.5
+12 3 1225
+13 3 1750
+14 3 1950
+15 3 2450
+1 4 1362.5
+2 4 1387.5
+3 4 1262.5
+4 4 1912.5
+5 4 1862.5
+6 4 1950
+7 4 2587.5
+8 4 1450
+9 4 1637
+10 4 925
+11 4 1325
+12 4 962.5
+13 4 1337.5
+14 4 1550
+15 4 2237.5
diff --git a/data/ZimmermannTab4.4.rda b/data/ZimmermannTab4.4.rda
deleted file mode 100644
index 71dfae6b2f7377794cc01cf10172889443915067..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
literal 404
zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6&u)<s6e#lhW0!k<4m
z2~GC-;v*q3qqXsoLTimfPV)aoMjjc71t#oM#2PLs1w=7<op#7%)mY22G<3lhsVUbQ
zE=2`Iv3tFCd=XgvGFhKF%I5OyvIGf*S;-9<jg1Q>7kqqUV92Rt_nfum-EQWE>2sPd
zeC}5GVzc7MoZNt2tWNrKm=;Pe{BlNEplX%)6#lK{2ZJ^4ax9EyTJY)ef^QogU$~kt
ze04_Q%bW6me`y+X8JDIie%WHQ!ctRU*K6*Ud0$zt&NcWeeBn&%ZvM1&_E+LB6ht0i
z`s&YXBBQn7-PVQ+lYc3ENfBMKQ*gyAvDFLOj$bJa__|x+%N_TCD6Y`^Ld7fohdJEk
z<h?JKVdHy~Y2j~|1%J|4yo-w9{V0+3^W3cIGiFEeq;MECaFuo_co${*aZWiKGbM^a
zSWn}WzvJcekyGN=u^Tswcg&Ph*mh$<^prW1BX~A*sGXQPDPq!!>0vBa_@De`PGq>^
L%4as2je!9Gy9lyU
diff --git a/data/ZimmermannTb4.4.rda b/data/ZimmermannTb4.4.rda
index 3aa829d7a749f279d9a573ac313265abf2ad2f0d..ae44f17d618af10083b31b4c3a160962023c052e 100644
GIT binary patch
literal 477
zcmZ>Y%CIzaj8qGbbm&-V#=zA3|NsC0XM|W7>z}v?TnVsGzkeo0w7&k2Bd-91BZG>t
zBMajO#vB%2U(XevgR}ZQG8bI1b-rTjVCy*H;!}nT3{uQSy|xlp+NGqVq!<?%GCQO&
zFfMCgYe->WVCEF@$W&jf9L#Yca~6Z(WK+3iGlW?Z+)Nlv4sc#Sxo&C4gZx#j8BglY
zT{%^JYE9Xa=w)YhBqMKdxthMz{ju+TN_OakS<|-eo9glCHy>Zq{>KuY*W!iW81C7k
z)57W7F_~)<mupm7z+|42X`VeT2agGNG>1B_Hu%MUMM;Y>!hADRM`c>;lzqjs^D>Q=
zZk~2gWzv_8N+MsLsIX+k<Q}`1*W#$sv4N>rV4=Cs6;sa~yZY+8xtX7zpI^E^Zh^=o
zuL&v#dxRJlF5xvw77EK{ul7(lz_Dfe&knI*E*>w(1#<gy_Qi&j|9p8#R?wk!3P;|7
z)^xsE0-sBcMTzlo#+h(*yEt53#Qn~kb$gxhr|e$U7K4{ZW|$xDWtX2>b9|vBKhGIM
z{zq#s{aa|+Bvvr7VYT?`M@;i(J{FxZKk(74CKah&%RM*VzOXn`p;uGldak>Hq?2J|
k6W@*vRoT`>i%t28mq(~QHINsvKYC}PpNNWpl9q1+04T)AN&o-=
literal 550
zcmZ>Y%CIzaj8qGbWKf>Bhk<Ed{r~^}&j`6N)<21zcqPF8`Q0-qqV@HE9C-y892r!E
z9a$I;Fs@^d-ljEgva>I<gTMj72DW8B3@j(AW(YGHNTtl|G+5E*klDe21T>8r7+8)q
z8Zh`UFsLywWH9tFxUqE2@-<p~Yx&AwP8qz+S592GY%1aJXzRFq<*SSnjEhf7N%7kH
zng#tmnN(o2-}`9ylLwbnb~aC0{7Yfhdo7--H7ZQSa);PcHY;<!+;@R{-LArS;qB?O
zV(;l^KjXC4Hn}WuuOY%=$^@ar#jI&IAJwELUFtXFY;Fk_VB6xjirGWyU9&(4x1#vz
z0IfETug$$;Qn}j|z4mWC9l@v*rsCR}XJp_q<J-a$lczE=XhyVZ3#`ok@%HZWofA6z
zpI&&Mnv>&i^L5#Zq>o7p7#27s99$q^V$!%Q;6Ui?gaVUB$0hrHRi;&Q-tsc+kUjn7
zEd%cs*2-r=Ilm`NVqmqH+QK9h*rF`?kt<T^(S+nLstU>y3__wZ+mCqdcIYs<v9gRY
z?(`n+?Q{R=HBDI@T_BeIN7g*0sk~u-Vng}?AF*=#AKx@u3?1JoJ!R40&Uv&bJVQ`*
zE5llLgNu`Fj5Hs}@Gz-LGA8tjE4*}akeR>2VS$s?<lDQOwlYgJ^fyf4-xK(6U3<K>
w(m%#^VpFF6P|%p=q~)u**Su@qJn5-<z9u(xBn)mb1W1;P7r9ylOaP?|00EKQNdN!<
--
GitLab