From 396f5ec00b62d0687de046a1fc8a6c98eca61ef5 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Thu, 23 Jun 2016 23:08:14 -0300 Subject: [PATCH] =?UTF-8?q?Corrige=20os=20=C3=BAltimos=20datasets=20de=20Z?= =?UTF-8?q?immermann.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .RData | Bin 2586 -> 0 bytes DESCRIPTION | 15 +-- R/ZimmermannTb16.1.R | 59 ++++----- R/ZimmermannTb16.4.R | 47 ++++--- R/ZimmermannTb3.5.R | 54 ++++---- R/ZimmermannTb7.4.R | 48 +++---- R/ZimmermannTb8.5.R | 47 +++---- R/ZimmermannTb9.13.R | 57 +++++---- R/ZimmermannTb9.17.R | 67 +++++----- R/ZimmermannTb9.26.R | 60 ++++----- data-raw/.~lock.PimentelTb8.3.1.csv# | 1 - data-raw/.~lock.PimentelTb9.3.1.csv# | 1 - data-raw/ZimmermannTb16.1.txt | 2 +- data-raw/ZimmermannTb16.3.txt | 30 ++--- data-raw/ZimmermannTb16.4.txt | 2 +- data-raw/ZimmermannTb3.5.txt | 58 ++++----- data-raw/ZimmermannTb7.4.txt | 182 +++++++++++++-------------- data-raw/ZimmermannTb8.5.txt | 146 ++++++++++----------- data-raw/ZimmermannTb9.13.txt | 56 ++++----- data-raw/ZimmermannTb9.17.txt | 2 +- data-raw/ZimmermannTb9.22.txt | 112 ++++++++--------- data-raw/ZimmermannTb9.26.txt | 2 +- data/ZimmermannTb16.1.rda | Bin 361 -> 369 bytes data/ZimmermannTb16.3.rda | Bin 238 -> 266 bytes data/ZimmermannTb16.4.rda | Bin 250 -> 256 bytes data/ZimmermannTb3.5.rda | Bin 357 -> 341 bytes data/ZimmermannTb7.4.rda | Bin 975 -> 1026 bytes data/ZimmermannTb8.5.rda | Bin 772 -> 748 bytes data/ZimmermannTb9.13.rda | Bin 460 -> 520 bytes data/ZimmermannTb9.17.rda | Bin 665 -> 707 bytes data/ZimmermannTb9.26.rda | Bin 337 -> 353 bytes man/ZimmermannTb12.32.Rd | 48 +++++++ man/ZimmermannTb12.33.Rd | 48 +++++++ man/ZimmermannTb16.1.Rd | 54 ++++++++ man/ZimmermannTb16.3.Rd | 34 +++++ man/ZimmermannTb16.4.Rd | 47 +++++++ man/ZimmermannTb3.5.Rd | 59 +++++++++ man/ZimmermannTb7.4.Rd | 53 ++++++++ man/ZimmermannTb8.5.Rd | 51 ++++++++ man/ZimmermannTb9.13.Rd | 57 +++++++++ man/ZimmermannTb9.17.Rd | 60 +++++++++ man/ZimmermannTb9.26.Rd | 56 +++++++++ 42 files changed, 1091 insertions(+), 524 deletions(-) delete mode 100644 .RData delete mode 100644 data-raw/.~lock.PimentelTb8.3.1.csv# delete mode 100644 data-raw/.~lock.PimentelTb9.3.1.csv# create mode 100644 man/ZimmermannTb12.32.Rd create mode 100644 man/ZimmermannTb12.33.Rd create mode 100644 man/ZimmermannTb16.1.Rd create mode 100644 man/ZimmermannTb16.3.Rd create mode 100644 man/ZimmermannTb16.4.Rd create mode 100644 man/ZimmermannTb3.5.Rd create mode 100644 man/ZimmermannTb7.4.Rd create mode 100644 man/ZimmermannTb8.5.Rd create mode 100644 man/ZimmermannTb9.13.Rd create mode 100644 man/ZimmermannTb9.17.Rd create mode 100644 man/ZimmermannTb9.26.Rd diff --git a/.RData b/.RData deleted file mode 100644 index 51f98615b868d3d848dea630b69084e961c03382..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2586 zcmb2|=3oE=W=3YNKVO4fB8<2qxEL51m>8Iu85o$D85kH?m>3us7#Ua?I2jlic=Uo2 z^HTD2^@>wdQy3T+co`U&iWnFeCo?cGaLxUC_gngz2E!s=tz@GKWkz$-om*mr9v<J8 z&N0{UTZ4$!foZ!O_O`QL`}pMk@!v<&4y1kfAic0eSh(QlM$36q68cUo{5S3A(#~D$ zAMG~f<Lml0;bl(U9lrN7FGZ^A#$La}m-KZLyTOyS8?9Q>eQK)vPHnuCk-~Q)d%K7e zXHjU+3{H{%$L`O$tl0eZ|K^m1;!2kdSBk9m$((L;W@m5qFNG!ig}1uaR||Z7Ip5r0 zC)^-RF)f;5(r!Ix>$=c~mva~cY<7jOTPwLXQZ@B=_AHZMx4Lde&#}1KKEFbl_p5z* zLeJdQiAh(F&$ZpmymtHR(5SfB;@2}|_?mtv2zt%*7n!V4^-J+u@y@=$x+GoZ7l8*R z2?R`2S<vv}xm#nb?d3SjEssttlah>NO`Te_`aeUfSKH$}D}e{m37eNc{T-;J7tX+E z^Yz}vg?5@#ewp6(i{JI?h?zytrhDq=7cZ)BHLf^gBlIs;D12@d@0xob-7lsZ>+Q^2 z*O7MIz5CqW=b3k3M_OoVE`C;U|8t{_@@ir3OIHr<`<GuL>ixOA<y}jz>~?Dwl`to* z*KO~oIu>lv7p&zqV_S4J;qjBni*tOw9Gv{;%Z7$<;d25B-z_8lw|lGZE%|kL?b|;b zo9yhBB%DPRtsHbbFE%nw3|M*hx6Y62Ob-t4<1}vlp&R<}_V1_-mJ^Sh>=1gFYIZv# zzHt7Ovx{#S1bq5q>f^GSaXWk9maw}lAH}b{30d~*Vr-OaeblY_*0(Cu1S8*U;JZ;9 zd}F#s;jvv?7dRc%w40+};kk~x=l6Rxl~e4AQaS=L^Yo8+%zOGOaq=AVkENgHo-fGV z+akGKYBTq_IV%k{uFcr2?Zh(C(~R#~1g}&%+t0h79$HphE4C1^dlbcUDCEq~)!`@i zpZC2i@aajve$=S~(_quZD<%7zb^E4O%~|Kref&GKo20&C!Q>kPic<FPstxwf<Oo=y z9eJ@=s=W379igPg`@ySRw`vMG`y7@`T%>;a!ry|z*zcwHU(4yOG`;a}g1+_b%oR7a z!j@#@i2j@w|Fcu@(A%!V9$T6&^{zgg68j@<xrgQZzf;b?{37|J?3P4!hN_xts(o}@ z*0J5&*aJ?)Y%l(rUO92wJnjSY|Ju$Ic(Fe7Ot$vyiUprmv5Uo=x!2y>pKhmkG+EKL z<|do(rF*|CeUJV-!>+ac^*i~Un@)JmI(zyv=L^jRllv+@#&R#a`{VAxh3l<?n?-NE znI~ar!z0yGwDY@M!8EUJDqH?ESag1#D)qbE;6kxru1)uG{wa3?%9}(_oIh}IF`vz^ z2MZ@CS}ajocfpb4W#^L~t~13lJscM%&7arUurY6r$nEFTHQs&sXSMkj<AtK;#GEUd z`dj9inhEVr5`M7Q|LU2yohc8NPJN;D>!-hl%8N7}wi0feCfnVg9_$bLu=Bzp7dA$< z2+_OxR%;rwKkz!=+mpt*SLC&{!l9)%TN3hR1#9wr^DktdI;oUwcW;G6@8uq)*eQFG zB$pd$EH-lJI?uDEkN=4WBk#jq`{uqA*lN7ujnkWrA-%@$g$h1~E+~mub!MI4vIL&r z{|}v;|63!hcj=nj5tTM+Zr6((=U5u>r0A=-iq=}>TUOmlFjk+iuKCcPi6-Z#%(^b& zw1>Ht;fraAjs1$H0oyV<7M-%X?ol)EJx^x%syi1dR|oxF^Qd8VnMO$QwZ|_eJlXbZ zw&ccu97S%Ojz{-P?r=*_%1(|;IC1@d&lZoz2}^J9f5a~<ze4M3%9-b>cmH_KO5U{I zXXA%;xf_qX)@F>jVRg0Yb?d|p)iUvWV*d$*FeY6-^tR=Xg3^aQdql5Y3edeI{)kKX zUB>e&DWBhI1%G6>*MGWF6Uy+_!N26;x(1HIMYX$r7(BgTVX*s6h(P?5#R|cfP8qr< z_%Gk<^FjKq!nRq;O<{XCy->Tx@`iUtlg+8N<RXXpRRw3_C#ckF#ajrmxy<S}nRVd` zU&o%T=CUagJ@1-k&iHd6N%W%4^2`+zPAeZ$vR!qLBhR&xCtIFt&dK0sLNZ)W8+c!c ziR?Jor?G18RjZ(P<`?X&nR0?e`Axp3%$hVurZQm<-$|cLq5lu64}M>C-;RGp{2Aq* zoW<Yv_#dt=dciO8fkCstC31Id#2KX}R!NVe3!ZkIv03r5S)@6H@esQ}!ULui?lqiy zr(H;ETDIuvgf$vUo)>xkF`nMzmK$qy=;QVSDZeL~+|QOik?Xl-*MxKS6PDl0eY3Q4 zLr9p8-lX<}mlYU1m!3&m@cY37&8kCtK6GiMPfuI(Pr_@@;<cWi{&@W~SU-Etl8-BQ z?MT19Im#~L>jbu4iZzYLTt#xP6*^5mAkDDcFMCgpxpBay%AHEyU3We1?z+J<O;;gi z{kuJvHbl-~VAHn_@s6GOf|-Z^SI@h17uK<C)zSLi@TH@0`=rZtcM?1&`0{M}u<yZ# z@3u({s~4?Ux5djR=g;w)hNja-P6e^^dfr{}Iejlo_KfxK<+@k?U3eJwAy2WkTzcDO ziQ0qOZCR&Wk8`Ns3*Q)d$U#|^mr-TSo2i!$%~w<3ku6YIA#1kH_?1?ORGZt=U6Y#L zC&l<_T=ZSl7InX5^R0+kq7%;N6g`d1I3RX-uI7Z5$+L4~O>$1zM^u?HGOpkJtzu_$ z5!X4bi5@ZzTG_o9#6rItr*tx?Y&#xzBK?8(|GoCQGt8Z5$!>FuNIP9}aR2Ax;y1zt zQ}P+ND*cOmVs01um+{d-2ey(o+g!f2^_RNJIo(e_`_JOzb33s^?>;F{zi<0gpWTE> zxcFKDhpmaEL-RN8H`AB=`FC4WYuEDg@%!KBy<E+<_TOK7#y3YBG;QVLezLbWYJ4bJ zex+|;_`BVDA^YYAJ9~MxtvHbp-#H_2pGUVd>(V-xWZ9ZeHhMdb|CGKpv177}7?V(5 zN&P2D*0pxi{WWtOJ?d?Ao<)^53Ew(8wRBfjX3$p0#s$nJ5}k634R+^wujW}*eQQ>o zk^q1CVUfu9Z4&R!^hDR(IsW`@yVio~xe3|{E8d>A%Y3iGJ!eZw@8o4ucX9ps{bSh# z@rB#=76$)y5GY|*eZ+JxvSzw))xSiC&S%Sxn)xmHT)jGU;%fK*3>DXA%qg0^?bjgz z=V@7)t&7g@Qc|lZ6wpZ(*xA2vYWAg~GcmIi9(LL9Sy~?&r*U%U%e8Sq{_lAF_Z_?| z>e%p{wWCzPmrF)(cdXLwBa=VxExvG8D?0h&iAL9VA9tubBp<nBl5+WG`6S6Zcha*` zzZib!uPswko;4+>=fzU<yKC1UyEiSPN7K*Enc?*3S{3WiEeA@C3eMbQNO;Nk@^bQ) z=&&DpYk0jgcHQM`%70|+|8v?`zP>WM`!SCMmCtT0OE#ZU`SU<kK;Aqd{qNbi2J7BR Y2HuWZCY<}8fq~(l@$#4a%v=l%02!k3H2?qr diff --git a/DESCRIPTION b/DESCRIPTION index 1467691d..30933d93 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,12 +1,7 @@ Package: labestData Title: Conjuntos de Dados para Ensino de Estatística -<<<<<<< HEAD -Version: 0.0-1 -Date: 2016-04-05 -======= -Version: 0.0-13.344 -Date: 2016-06-04 ->>>>>>> 5568460d33f01093c420278afc63586af550856a +Version: 0.0-15.387 +Date: 2016-06-19 Authors@R: as.person(c( "PET Estatística UFPR <pet.estatistica.ufpr@gmail.com> [cre]", "Altamiro Antonio Basiewics <alfbasiewics@bol.com.br> [ctb]", @@ -28,7 +23,7 @@ Description: O labestData é um projeto coletivo do PET Estatística UFPR do PET Estatística a desenvolver pacote R com versionamento Git e 2) contribuir com a comunidade científica ao reunir, organizar, manter e disponibilizar conjuntos de dados disponíveis em livros, páginas - de internet e arquivos pessoais. Nesta versão o pacote tem 344 + de internet e arquivos pessoais. Nesta versão o pacote tem 387 conjuntos de dados. License: GPL-3 URL: @@ -53,11 +48,7 @@ Suggests: reshape2, MASS, qcc, -<<<<<<< HEAD - multcomp -======= multcomp, vcd ->>>>>>> 5568460d33f01093c420278afc63586af550856a VignetteBuilder: knitr RoxygenNote: 5.0.1 diff --git a/R/ZimmermannTb16.1.R b/R/ZimmermannTb16.1.R index a21a406e..13ba80be 100644 --- a/R/ZimmermannTb16.1.R +++ b/R/ZimmermannTb16.1.R @@ -1,45 +1,46 @@ #' @name ZimmermannTb16.1 -#' @title Análise de Composição do Solo -#' @description Dados de análise de solos aluviais, que apresentaram pH abaixo -#' de sete, referentes à associação existente entre teor de matéria -#' orgânica no solo (porcentagem) com disponibilidade de fósforo -#' (mg kg\eqn{^{-1}}). A amostra tem apenas sete observações. -#' -#' @format Um \code{data.frame} com 7 observações e 7 variáveis +#' @aliases ZimmermannTb16.2 +#' @title Análise de Composição do Solo Aluviais +#' @description Dados de análise de solos aluviais, que apresentaram pH +#' abaixo de sete, referentes à associação existente entre teor de +#' matéria orgânica no solo (porcentagem) com disponibilidade de +#' fósforo (mg kg\eqn{^{-1}}). A amostra tem apenas sete +#' observações. +#' @format Um \code{data.frame} com 7 observações e 7 variáveis, em que #' #' \describe{ #' -#' \item{\code{origem}}{Fator de níveis nominais. Identifica a origem da -#' repetição.} -#' -#' \item{\code{MO}}{Variável de níveis numéricos. Identifica a quantidade de -#' matéria orgânica no solo (porcentagem).} -#' -#' \item{\code{fosf}}{Variável de níveis numéricos. Identifica a disponibilidade -#' de fósforo no solo (mg kg\eqn{^{-1}}).} -#' -#' \item{\code{postoMO}}{Posto da váriavel MO.} -#' -#' \item{\code{postofosf}}{Posto da váriavel fosf.} -#' -#' \item{\code{Nc}}{Indica o número de pares concordantes.} -#' -#' \item{\code{Nd}}{Indica o número de pares discordantes.} +#' \item{\code{origem}}{Fator de níveis nominais que identifica o local +#' de origem da amostra de solo.} +#' +#' \item{\code{mo}}{Matéria orgânica no solo (\%).} +#' +#' \item{\code{fosf}}{Disponibilidade de fósforo no solo (mg +#' kg\eqn{^{-1}}).} +#' +#' \item{\code{pmo}}{Posto da váriavel \code{mo}.} +#' +#' \item{\code{pfosf}}{Posto da váriavel \code{fosf}.} +#' +#' \item{\code{Nc}}{Indica o número de pares de postos concordantes.} +#' +#' \item{\code{Nd}}{Indica o número de pares de postos discordantes.} #' #' } #' @keywords correlacao #' @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. (Tabela 16.1, pág 327) +#' Feijão. (Tabela 16.1, pág. 327) #' @examples #' #' data(ZimmermannTb16.1) -#' #' str(ZimmermannTb16.1) #' -#' mean(ZimmermannTb16.1$MO) +#' mean(ZimmermannTb16.1$mo) #' mean(ZimmermannTb16.1$fosf) -#' -#' var(ZimmermannTb16.1$MO) -#' var(ZimmermannTb16.1$fosf) +#' +#' with(ZimmermannTb16.1, { +#' cbind(pmo = rank(mo), pfosf = rank(fosf)) +#' }) +#' NULL diff --git a/R/ZimmermannTb16.4.R b/R/ZimmermannTb16.4.R index f8d6ac71..d3d39136 100644 --- a/R/ZimmermannTb16.4.R +++ b/R/ZimmermannTb16.4.R @@ -1,43 +1,38 @@ #' @name ZimmermannTb16.4 -#' @title Hastes Mortas por Elasmopalpus lignosellus L. -#' @description Dados de um experimento em delineamento inteiramente -#' casualizado para testar cultivares de arroz, em casa de vegetação, -#' três das quais (A, B e C) estão presentes na tabela. Os dados são -#' referentes ao número de hastes mortas por \emph{Elasmopalpus lignosellus} -#' por parcela. Cada cultivar foi repetida três vezes. -#' +#' @title Hastes Mortas de Arroz por \emph{Elasmopalpus lignosellus} L. +#' @description Dados de um experimento em delineamento inteiramente +#' casualizado que estudou cultivares de arroz, em casa de +#' vegetação. Os dados são referentes ao número de hastes mortas por +#' \emph{Elasmopalpus lignosellus} por parcela. Cada cultivar foi +#' repetida três vezes. #' @format Um \code{data.frame} com 9 observações e 3 variáveis #' #' \describe{ #' -#' \item{\code{classe}}{Fator de níveis nominais. Identifica a cultivar da -#' repetição.} -#' -#' \item{\code{mortas}}{número de hastes mortas por \emph{Elasmopalpus +#' \item{\code{cult}}{Fator categórico que identifica as cultivares de +#' arroz.} +#' +#' \item{\code{nmort}}{Número de hastes mortas por \emph{Elasmopalpus #' lignosellus} por parcela.} -#' -#' \item{\code{posto}}{Posto da váriavel mortas.} -#' +#' +#' \item{\code{posto}}{Posto da váriavel \code{nmort}.} +#' #' } -#' @keywords DIC +#' @keywords DIC contagem #' @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. (Tabela 16.4, pág 341) +#' Feijão. (Tabela 16.4, pág. 341) #' @examples #' #' library(lattice) #' #' data(ZimmermannTb16.4) -#' #' str(ZimmermannTb16.4) #' -#' xyplot(mortas ~ classe, data = ZimmermannTb16.4, -#' type = "o", jitter.x = TRUE, -#' xlab = "Cultivar da Planta", -#' ylab = "Número de Hastes Mortas", -#' main = "Hastes Mortas por Elasmopalpus", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(mortas ~ classe, data = ZimmermannTb16.4, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' xyplot(nmort ~ cult, data = ZimmermannTb16.4, +#' xlab = "Cultivar", +#' ylab = "Número de hastes mortas") +#' +#' rank(ZimmermannTb16.4$nmort) +#' NULL diff --git a/R/ZimmermannTb3.5.R b/R/ZimmermannTb3.5.R index fe04335f..884c6e3e 100644 --- a/R/ZimmermannTb3.5.R +++ b/R/ZimmermannTb3.5.R @@ -1,43 +1,51 @@ #' @name ZimmermannTb3.5 -#' @title Produção de Grãos de Arroz Irrigado -#' @description Dados de um estudo sobre adubação nitrogenada na cultura de -#' arroz irrigado. Foram testadas quatros formas de aplicação do adubo: -#' 1 = 80 kg/ha no plantio; 2 = 40 kg/ha 40 dias no plantio após a -#' emergência (DAE); 3 = 13.2 kg/ha no plantio e 66.8 kg/ha aos 40 DAE; -#' e 4 = 13.2 kg/ha no plantio e 33.4 kg/ha aos 40 e 60 DAE. O experimento -#' teve oito repetições. +#' @title Fracionamento da Adubação na Produção de Grãos de Arroz +#' Irrigado +#' @description Dados de um estudo sobre adubação nitrogenada na cultura +#' do arroz irrigado. Foram testadas quatros formas de aplicação do +#' adubo fazendo o fracionamento das quantidades em diferentes +#' épocas. O experimento foi instalado em delineamento inteiramente +#' casualizado com 8 repetições. #' @format Um \code{data.frame} com 32 observações e 3 variáveis #' #' \describe{ #' -#' \item{\code{rept}}{Fator de níveis numericos. Identifica a repetição da -#' observação.} +#' \item{\code{trat}}{Fator de níveis categóricos que representa as +#' formas de adubação: 1 = 80 kg/ha no plantio, 2 = 40 kg/ha 40 dias +#' no plantio após a emergência (DAE), 3 = 13.2 kg/ha no plantio e +#' 66.8 kg/ha aos 40 DAE, e 4 = 13.2 kg/ha no plantio e 33.4 kg/ha +#' aos 40 e 60 DAE.} #' -#' \item{\code{trat}}{Fator de níveis numéricos. Identifica o tratamento -#' aplicado.} +#' \item{\code{rept}}{Inteiro que identifica as repretições de uma forma +#' de adubação.} #' -#' \item{\code{prod}}{Produção de grãos de arroz irrigado (ka ha\eqn{^{-1}}).} +#' \item{\code{prod}}{Produção de grãos de arroz irrigado (ka +#' ha\eqn{^{-1}}).} #' #' } #' @keywords DIC #' @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. (Tabela 3.5, pág 55) +#' Feijão. (Tabela 3.5, pág. 54) #' @examples #' #' library(lattice) #' #' data(ZimmermannTb3.5) -#' #' str(ZimmermannTb3.5) #' -#' xyplot(prod ~ rept | trat, data = ZimmermannTb3.5, -#' type = "o", jitter.x = TRUE, -#' xlab = "Repetições", -#' ylab = expression("Grãos de Arroz"~(kg~ha^{-1})), -#' main = "Produção de Grãos de Arroz", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(prod ~ trat, data = ZimmermannTb3.5, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' # Quantidade[época]. +#' adub <- expression(80[0], +#' 40[0] + 40[40], +#' 13.2[0] + 66.8[40], +#' 13.2[0] + 33.4[40] + 33.4[60]) +#' xyplot(prod ~ adub, data = ZimmermannTb3.5, +#' type = c("p", "a"), jitter.x = TRUE, +#' xlab = "Formas de adubação", +#' ylab = expression("Produção de arroz"~(kg~ha^{-1})), +#' scales = list(x = list(labels = adub))) +#' +#' aggregate(prod ~ adub, data = ZimmermannTb3.5, +#' FUN = function(x) { c(mean = mean(x), sd = sd(x)) }) +#' NULL diff --git a/R/ZimmermannTb7.4.R b/R/ZimmermannTb7.4.R index 5f2046d6..b64afe02 100644 --- a/R/ZimmermannTb7.4.R +++ b/R/ZimmermannTb7.4.R @@ -1,41 +1,45 @@ #' @name ZimmermannTb7.4 -#' @title Produção de Grãos de Arroz em Ensaio Reticulado Retangular -#' @description Dados de um estudo sobre competição de cultivares de arroz -#' irrigado. O experimento foi conduzido em ensaio em reticulado retangular -#' 5x6, com três repetições e três blocos (X, Y e Z). A unidade de -#' medida é kg/ha. -#' @format Um \code{data.frame} com 90 observações e 3 variáveis +#' @title Produção de Grãos de Arroz em Ensaio Reticulado Retangular +#' @description Dados de um estudo sobre competição de cultivares e +#' linhagens de arroz irrigado quanto a produtividade. O experimento +#' foi conduzido em ensaio em reticulado retangular 5 \eqn{\times} 6 +#' (blocos de tamanho 5, 6 blocos por repetição), com três +#' repetições. +#' @format Um \code{data.frame} com 90 observações e 3 variáveis, em que #' #' \describe{ #' -#' \item{\code{rept}}{Fator de níveis numericos. Identifica a repetição da -#' observação.} +#' \item{\code{rept}}{Fator categórico que representa as repetições do +#' experimento. Cada repetições tem 6 blocos de tamanho 3, +#' perfazendo 30 parcelas, uma para cada uma das +#' cultivares/linhagens estudadas.} #' -#' \item{\code{bloco}}{Fator de níveis nominais. Identifica o bloco da -#' repetição.} +#' \item{\code{bloco}}{Fator categórico que indentifica os blocos.} #' -#' \item{\code{prod}}{Produção de grãos de arroz irrigado (ka ha\eqn{^{-1}}).} +#' \item{\code{cult}}{Fator categórico que identifica as +#' cultivares/linhagens em competição.} +#' +#' \item{\code{prod}}{Produção de grãos de arroz irrigado (ka +#' ha\eqn{^{-1}}).} #' #' } #' @keywords reticulado #' @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. (Tabela 7.4, pág 140) +#' Feijão. (Tabela 7.4, pág. 140) #' @examples #' #' library(lattice) #' #' data(ZimmermannTb7.4) -#' #' str(ZimmermannTb7.4) #' -#' xyplot(prod ~ rept, groups = bloco, data = ZimmermannTb7.4, -#' type = "o", jitter.x = TRUE, -#' xlab = "Repetições", -#' ylab = expression("Grãos de Arroz"~(kg~ha^{-1})), -#' main = "Reticulado Retangular 5x6", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(prod ~ bloco, data = ZimmermannTb7.4, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' xtabs(~bloc + rept, data = ZimmermannTb7.4) +#' xtabs(~cult + rept, data = ZimmermannTb7.4) +#' +#' xyplot(prod ~ reorder(cult, prod), +#' data = ZimmermannTb7.4, type = c("p", "a"), +#' xlab = "Cultiavres", +#' ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1}))) +#' NULL diff --git a/R/ZimmermannTb8.5.R b/R/ZimmermannTb8.5.R index d155bee9..7b78123b 100644 --- a/R/ZimmermannTb8.5.R +++ b/R/ZimmermannTb8.5.R @@ -1,19 +1,23 @@ #' @name ZimmermannTb8.5 -#' @title Produção de Grãos de Feijão em BAF -#' @description Dados de um estudo em desenho de blocos aumentados de Federer, -#' com dezoito blocos, cada um com quatro testemunhas, tratamentos 1 a 4 e -#' 12 linhagens, resultando num total de 216 linhagens. Os dados -#' referem-se a produção de grãos de feijão em kg/ha. -#' -#' @format Um \code{data.frame} com 90 observações e 3 variáveis +#' @title Produção de Grãos de Feijão em Delineamento de Blocos Aumentos +#' de Federer +#' @description Dados de um estudo em desenho de blocos aumentados de +#' Federer, com total de dezoito blocos, cada um com quatro +#' testemunhas (1 a 4), e 12 linhagens, num total de 216 +#' linhagens. Os dados são de apenas 10 dos blocos, contendo 9 +#' parcelas em cada um, 4 delas sendo testemunhas e as 5 restantes +#' são linhagens. A resposta medida foi a produção de grãos de +#' feijão em kg ha\eqn{^{-1}}. +#' @format Um \code{data.frame} com 90 observações e 3 variáveis, em que #' #' \describe{ #' -#' \item{\code{bloco}}{Fator de níveis numéricos. Identifica o bloco da -#' repetição.} -#' -#' \item{\code{trat}}{Fator de níveis numericos. Identifica o tratamento -#' aplicado.} +#' \item{\code{bloc}}{Fator categórico que identifica os blocos do +#' experimento. Cada bloco tem tamanho 9.} +#' +#' \item{\code{linh}}{Fator categórico que identifica as linhagens do +#' experimento. A linhagens identificas de 1 a 4 são as +#' testemunhas.} #' #' \item{\code{prod}}{Produção de grãos de feijão (ka ha\eqn{^{-1}}).} #' @@ -21,22 +25,19 @@ #' @keywords BAF #' @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. (Tabela 8.5, pág 158) +#' Feijão. (Tabela 8.5, pág. 158) #' @examples #' #' library(lattice) #' #' data(ZimmermannTb8.5) -#' #' str(ZimmermannTb8.5) #' -#' xyplot(prod ~ bloco, data = ZimmermannTb8.5, -#' type = "o", jitter.x = TRUE, -#' xlab = "Blocos", -#' ylab = expression("Grãos de Feijão"~(kg~ha^{-1})), -#' main = "Blocos Aumentados de Federer", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(prod ~ bloco, data = ZimmermannTb8.5, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' xtabs(~linh, data = ZimmermannTb8.5) +#' xtabs(~bloc, data = ZimmermannTb8.5) +#' +#' xyplot(prod ~ reorder(linh, prod), data = ZimmermannTb8.5, +#' xlab = "Linhagens (ordenadas)", +#' ylab = expression("Produção de grãos de feijão"~(kg~ha^{-1}))) +#' NULL diff --git a/R/ZimmermannTb9.13.R b/R/ZimmermannTb9.13.R index e1424433..94b43eb1 100644 --- a/R/ZimmermannTb9.13.R +++ b/R/ZimmermannTb9.13.R @@ -1,25 +1,27 @@ #' @name ZimmermannTb9.13 #' @title Matéria Seca de Feijão em Fatorial 3x3 -#' @description Dados de um estudo em ensaio fatorial 3x3, considerando -#' três doses de densidade de solo e uma dose intermediária de -#' microelementos de 1 grama por vaso de FTE-BR-12. Cada vaso continha três -#' plantas de arroz e, adicionalmente aos microelementos , foi feita -#' adubação com 4g por vaso de formulado 5-30-15. Os dados são de matéria -#' seca de feijão, sem unidade de medida. -#' -#' @format Um \code{data.frame} com 27 observações e 4 variáveis +#' @description Dados de um estudo em ensaio fatorial 3 \eqn{times} 3, +#' considerando três níveis de densidade de solo e três doses +#' microelementos. Cada vaso continha três plantas de arroz e, +#' adicionalmente aos microelementos, foi feita adubação com 4 g por +#' vaso de formulado 5-30-15. Os dados são de matéria seca de +#' feijão, em escala logarítmica. O experimento foi instalado em +#' delineamento de blocos casualizados. +#' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que #' #' \describe{ #' -#' \item{\code{rept}}{Fator de níveis numéricos. Identifica a repetição da -#' observação.} -#' -#' \item{\code{micro}}{Fator de níveis numericos. Identifica os microelementos -#' presentes.} -#' -#' \item{\code{dens}}{Fator de níveis numericos. Identifica a densidade do solo.} +#' \item{\code{micro}}{Fator de níveis métricos que são as doses de +#' microelementos (FTE-BR-12) aplicado ao solo (g vaso\eqn{^{-1}}).} #' -#' \item{\code{imseca}}{Matéria seca de feijão.} +#' \item{\code{dens}}{Fator de níveis métricos que é densidade do solo +#' na qual foram cultivadas as plantas (g dm\eqn{^{-1}}).} +#' +#' \item{\code{rept}}{Inteiro que identifica as repetições de cada cela +#' experimental.} +#' +#' \item{\code{imseca}}{Logaritimo decimal da matéria seca das plantas +#' de feijão.} #' #' } #' @keywords FAT fatorial @@ -31,19 +33,16 @@ #' library(lattice) #' #' data(ZimmermannTb9.13) -#' #' str(ZimmermannTb9.13) #' -#' xyplot(imseca ~ rept, data = ZimmermannTb9.13, -#' type = "o", jitter.x = TRUE, -#' xlab = "Repetições", -#' ylab = expression("Matéria Seca de Feijão"), -#' main = "Ensaio Fatorial 3x3", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(imseca ~ dens, data = ZimmermannTb9.13, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) -#' -#' aggregate(imseca ~ micro, data = ZimmermannTb9.13, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' xtabs(~micro + dens, data = ZimmermannTb9.13) +#' +#' xyplot(lms ~ dens, data = ZimmermannTb9.13, +#' groups = micro, type = c("p", "a"), +#' auto.key = list( +#' title = expression("Microelementos"~(g~vaso^{-1})), +#' cex.title = 1.1, columns = 3), +#' xlab = expression("Densidade do solo"~(g~cm^{-3})), +#' ylab = "log da matéria seca") +#' NULL diff --git a/R/ZimmermannTb9.17.R b/R/ZimmermannTb9.17.R index 4e299b1a..f910f8ce 100644 --- a/R/ZimmermannTb9.17.R +++ b/R/ZimmermannTb9.17.R @@ -1,49 +1,52 @@ #' @name ZimmermannTb9.17 -#' @title Produção de Grãos de Arroz em Fatorial 3x3 -#' @description Dados de um estudo em ensaio fatorial 3x3, referentes à -#' produção de grãos de arroz, em kg/ha. O delineamento é o de blocos -#' completos ao acaso, com três repetições. Foram testados os efeitos -#' do nitrogênio, potássio e épocas de aplicação destes elementos na -#' produtividade da soca do arroz irrigado. -#' -#' @format Um \code{data.frame} com 81 observações e 5 variáveis +#' @title Época de Aplicação de NK na Produção de Grãos de Arroz +#' @description Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3, +#' referentes à produção de grãos de arroz, em kg ha\eqn{^{-1}}. O +#' delineamento é o de blocos completos ao acaso, com três +#' repetições. Foram testados os efeitos do nitrogênio, potássio e +#' épocas de aplicação destes elementos na produtividade da soca do +#' arroz irrigado. +#' @format Um \code{data.frame} com 81 observações e 5 variáveis, em que #' #' \describe{ #' -#' \item{\code{epoca}}{Fator de níveis numéricos. Identifica a época da -#' observação.} -#' -#' \item{\code{pota}}{Fator de níveis numericos. Identifica o nível de -#' potássio.} -#' -#' \item{\code{nitr}}{Fator de níveis numericos. Identifica o nível de -#' nitrogênio.} -#' -#' \item{\code{rept}}{Fator de níveis numericos. Identifica a repetição da -#' observação.} +#' \item{\code{epoc}}{Fator categórico que representa a época de +#' aplicação dos nutrientes.} #' -#' \item{\code{prod}}{Produção de grão de arroz em (ka ha\eqn{^{-1}}).} +#' \item{\code{pota}}{Fator categórico que representa a dose de potássio +#' aplicada.} +#' +#' \item{\code{nitr}}{Fator categórico que representa a dose de +#' nitrogênio aplicada.} +#' +#' \item{\code{bloc}}{Fator categórico que representa os blocos do +#' experimento. Os blocos tinham tamanho \eqn{3^3 = 27}.} +#' +#' \item{\code{prod}}{Produção de grão de arroz em (kg ha\eqn{^{-1}}).} #' #' } -#' @keywords FAT fatorial +#' @keywords FAT3 #' @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. (Tabela 9.17, pág 182) +#' Feijão. (Tabela 9.17, pág. 182) #' @examples #' #' library(lattice) #' #' data(ZimmermannTb9.17) -#' #' str(ZimmermannTb9.17) #' -#' xyplot(prod ~ rept, data = ZimmermannTb9.17, -#' type = "o", jitter.x = TRUE, -#' xlab = "Repetições", -#' ylab = expression("Grãos de Arroz"~(kg~ha^{-1})), -#' main = "Produção de Grãos de Arroz", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(prod ~ rept, data = ZimmermannTb9.17, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' ftable(xtabs(~nitr + pota + epoc, data = ZimmermannTb9.17)) +#' +#' xyplot(prod ~ nitr | epoc, data = ZimmermannTb9.17, +#' groups = pota, type = c("p", "a"), +#' as.table = TRUE, +#' auto.key = list(title = "Potássio", cex.title = 1.1, +#' columns = 3), +#' strip = strip.custom(strip.names = TRUE, +#' var.name = "Época", +#' sep = " : "), +#' xlab = "Nitrogênio", +#' ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1}))) +#' NULL diff --git a/R/ZimmermannTb9.26.R b/R/ZimmermannTb9.26.R index c7d44297..feb546a1 100644 --- a/R/ZimmermannTb9.26.R +++ b/R/ZimmermannTb9.26.R @@ -1,48 +1,48 @@ #' @name ZimmermannTb9.26 -#' @title Altura de Plantas em Fatorial 3x3x3 -#' @description Dados de um estudo em fatorial 3x3x3, sobre adubação +#' @title Época de Aplicação de NK na Altura de Plantas +#' @description Dados de um estudo em fatorial \eqn{3^3}, sobre adubação #' nitrogenada e potássica e suas épocas de aplicação. Os dados são -#' referentes a altura de plantas no cultivo da soca de arroz irrigado. -#' Foi realizada apenas uma repetição. -#' -#' @format Um \code{data.frame} com 27 observações e 4 variáveis +#' referentes a altura de plantas no cultivo da soca de arroz +#' irrigado. Dados referen-se apenas aos valores do primeiro +#' bloco. Veja \code{\link{ZimmermannTb9.17}}. +#' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que #' #' \describe{ #' -#' \item{\code{epoca}}{Fator de níveis numéricos. Identifica a epoca da -#' repetição.} -#' -#' \item{\code{pota}}{Fator de níveis numéricos. Identifica o nível de potássio -#' aplicado.} -#' -#' \item{\code{nitr}}{Fator de níveis numéricos. Identifica o nível de -#' nitrogênio aplicado.} +#' \item{\code{epoc}}{Fator categórico que representa a época de +#' aplicação dos nutrientes.} #' -#' \item{\code{altura}}{Alturas observadas das plantas.} +#' \item{\code{pota}}{Fator categórico que representa a dose de potássio +#' aplicada.} +#' +#' \item{\code{nitr}}{Fator categórico que representa a dose de +#' nitrogênio aplicada.} +#' +#' \item{\code{alt}}{Altura das plantas (cm).} #' #' } -#' @keywords FAT fatorial +#' @keywords FAT3 #' @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. (Tabela 9.26, pág 190) +#' Feijão. (Tabela 9.26, pág. 190) #' @examples #' #' library(lattice) +#' library(latticeExtra) #' #' data(ZimmermannTb9.26) -#' #' str(ZimmermannTb9.26) #' -#' xyplot(altura ~ epoca, data = ZimmermannTb9.26, -#' type = "o", jitter.x = TRUE, -#' xlab = "Época", -#' ylab = "Altura das Plantas", -#' main = "Experimento Fatorial 3x3x3", -#' scales = list(x = list(rot = 90))) -#' -#' aggregate(altura ~ pota, data = ZimmermannTb9.26, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) -#' -#' aggregate(altura ~ nitr, data = ZimmermannTb9.26, -#' FUN = function(x) { c(mean = mean(x), var = var(x)) }) +#' ftable(xtabs(~epoc + nitr + pota, data = ZimmermannTb9.26)) +#' +#' useOuterStrips(xyplot(alt ~ nitr + pota | epoc, outer = TRUE, +#' data = ZimmermannTb9.26, +#' type = c("p", "a"), +#' xlab = "Níveis de nitrogênio/potássio", +#' ylab = "Altura das plantas (cm)"), +#' strip = strip.custom( +#' strip.name = TRUE, var.name = "Época"), +#' strip.left = strip.custom( +#' factor.levels = c("Nitrogênio", "Potássio"))) +#' NULL diff --git a/data-raw/.~lock.PimentelTb8.3.1.csv# b/data-raw/.~lock.PimentelTb8.3.1.csv# deleted file mode 100644 index a9003a76..00000000 --- a/data-raw/.~lock.PimentelTb8.3.1.csv# +++ /dev/null @@ -1 +0,0 @@ -,petest,petest-G31M-ES2C,19.05.2016 17:04,file:///home/petest/.config/libreoffice/4; \ No newline at end of file diff --git a/data-raw/.~lock.PimentelTb9.3.1.csv# b/data-raw/.~lock.PimentelTb9.3.1.csv# deleted file mode 100644 index 382c896b..00000000 --- a/data-raw/.~lock.PimentelTb9.3.1.csv# +++ /dev/null @@ -1 +0,0 @@ -,petest,petest-G31M-ES2C,24.05.2016 15:19,file:///home/petest/.config/libreoffice/4; \ No newline at end of file diff --git a/data-raw/ZimmermannTb16.1.txt b/data-raw/ZimmermannTb16.1.txt index 8b1d7f54..c1a77ee9 100644 --- a/data-raw/ZimmermannTb16.1.txt +++ b/data-raw/ZimmermannTb16.1.txt @@ -1,4 +1,4 @@ -origem MO fosf postoMO postofosf Nc Nd +origem mo fosf pmo pfosf Nc Nd picos 0.6 2 1 1 6 0 luzi 0.9 16.6 2 4 3 2 parn 1.1 3.4 3 2 4 0 diff --git a/data-raw/ZimmermannTb16.3.txt b/data-raw/ZimmermannTb16.3.txt index b993f334..3ca922a7 100644 --- a/data-raw/ZimmermannTb16.3.txt +++ b/data-raw/ZimmermannTb16.3.txt @@ -1,15 +1,15 @@ -MO tipo -0.6 A -0.7 B -0.9 A -0.9 B -1.1 A -1.2 A -1.3 A -1.4 A -1.5 A -1.5 B -2.2 B -3.7 B -10.5 B -16.8 B +solo mo +A 0.6 +B 0.7 +A 0.9 +B 0.9 +A 1.1 +A 1.2 +A 1.3 +A 1.4 +A 1.5 +B 1.5 +B 2.2 +B 3.7 +B 10.5 +B 16.8 diff --git a/data-raw/ZimmermannTb16.4.txt b/data-raw/ZimmermannTb16.4.txt index 6e9cea65..aafd13ba 100644 --- a/data-raw/ZimmermannTb16.4.txt +++ b/data-raw/ZimmermannTb16.4.txt @@ -1,4 +1,4 @@ -classe mortas posto +cult nmort porto A 12 4 A 13 5 A 15 7 diff --git a/data-raw/ZimmermannTb3.5.txt b/data-raw/ZimmermannTb3.5.txt index c6806c3d..bf27df3a 100644 --- a/data-raw/ZimmermannTb3.5.txt +++ b/data-raw/ZimmermannTb3.5.txt @@ -1,33 +1,33 @@ -rept trat prod +adub rept prod 1 1 6276 -2 1 6035 -3 1 6086 -4 1 5594 -5 1 6321 -6 1 6746 -7 1 5751 -8 1 6191 -1 2 7199 +1 2 6035 +1 3 6086 +1 4 5594 +1 5 6321 +1 6 6746 +1 7 5751 +1 8 6191 +2 1 7199 2 2 6890 -3 2 6586 -4 2 7149 -5 2 6657 -6 2 6210 -7 2 6128 -8 2 6393 -1 3 6457 -2 3 6174 +2 3 6586 +2 4 7149 +2 5 6657 +2 6 6210 +2 7 6128 +2 8 6393 +3 1 6457 +3 2 6174 3 3 6612 -4 3 6087 -5 3 5797 -6 3 5865 -7 3 6498 -8 3 6486 -1 4 7202 -2 4 7173 -3 4 7169 +3 4 6087 +3 5 5797 +3 6 5865 +3 7 6498 +3 8 6486 +4 1 7202 +4 2 7173 +4 3 7169 4 4 6590 -5 4 6444 -6 4 6740 -7 4 6370 -8 4 7270 +4 5 6444 +4 6 6740 +4 7 6370 +4 8 7270 diff --git a/data-raw/ZimmermannTb7.4.txt b/data-raw/ZimmermannTb7.4.txt index 206c7768..2e62906b 100644 --- a/data-raw/ZimmermannTb7.4.txt +++ b/data-raw/ZimmermannTb7.4.txt @@ -1,91 +1,91 @@ -rept bloco prod -5 X1 4256.32 -1 X1 4628.45 -4 X1 4889.94 -3 X1 3713.22 -2 X1 4602.3 -10 X2 5710.34 -9 X2 5974.71 -6 X2 4236.21 -8 X2 5622.13 -7 X2 5386.78 -15 X3 7164.94 -13 X3 4150.57 -12 X3 4994.54 -11 X3 5543.68 -14 X3 5017.24 -20 X4 4916.09 -17 X4 6439.66 -16 X4 5517.53 -18 X4 5517.53 -19 X4 5256.03 -21 X5 5612.07 -25 X5 5177.59 -23 X5 4758.62 -24 X5 5595.98 -22 X5 5151.44 -30 X6 6929.6 -29 X6 4445.4 -28 X6 7243.39 -26 X6 3516.09 -27 X6 4393.1 -21 Y1 5181.61 -11 Y1 4968.39 -26 Y1 4445.4 -6 Y1 5445.98 -16 Y1 5962.07 -1 Y2 4573.56 -22 Y2 5181.61 -12 Y2 5657.47 -17 Y2 6529.89 -27 Y2 4785.34 -7 Y3 6197.41 -28 Y3 7217.24 -23 Y3 4520.69 -2 Y3 5334.48 -18 Y3 5525.29 -24 Y4 6275.86 -8 Y4 5710.34 -3 Y4 5287.36 -29 Y4 5909.77 -13 Y4 6344.83 -14 Y5 6066.67 -30 Y5 7086.49 -19 Y5 6397.7 -4 Y5 3739.37 -9 Y5 5419.54 -10 Y6 5419.54 -25 Y6 5049.43 -15 Y6 5419.54 -5 Y6 3859.77 -20 Y6 5948.28 -7 Z1 5282.18 -27 Z1 5177.59 -13 Z1 4445.4 -25 Z1 6249.71 -19 Z1 6537.36 -29 Z2 5831.32 -14 Z2 5099.14 -16 Z2 6589.66 -23 Z2 4629.31 -5 Z2 4282.76 -1 Z3 6223.56 -21 Z3 5726.72 -30 Z3 6979.31 -8 Z3 6118.97 -20 Z3 5700.57 -22 Z4 4229.89 -2 Z4 4994.54 -26 Z4 3164.08 -15 Z4 6825 -9 Z4 5445.98 -3 Z5 3556.32 -11 Z5 4441.38 -17 Z5 5075.86 -10 Z5 4236.21 -28 Z5 7687.93 -12 Z6 5525.29 -6 Z6 5831.32 -24 Z6 5818.97 -18 Z6 5974.71 -4 Z6 4863.79 +rept bloc cult prod +X X1 5 4256.32 +X X1 1 4628.45 +X X1 4 4889.94 +X X1 3 3713.22 +X X1 2 4602.3 +X X2 10 5710.34 +X X2 9 5974.71 +X X2 6 4236.21 +X X2 8 5622.13 +X X2 7 5386.78 +X X3 15 7164.94 +X X3 13 4150.57 +X X3 12 4994.54 +X X3 11 5543.68 +X X3 14 5017.24 +X X4 20 4916.09 +X X4 17 6439.66 +X X4 16 5517.53 +X X4 18 5517.53 +X X4 19 5256.03 +X X5 21 5612.07 +X X5 25 5177.59 +X X5 23 4758.62 +X X5 24 5595.98 +X X5 22 5151.44 +X X6 30 6929.6 +X X6 29 4445.4 +X X6 28 7243.39 +X X6 26 3516.09 +X X6 27 4393.1 +Y Y1 21 5181.61 +Y Y1 11 4968.39 +Y Y1 26 4445.4 +Y Y1 6 5445.98 +Y Y1 16 5962.07 +Y Y2 1 4573.56 +Y Y2 22 5181.61 +Y Y2 12 5657.47 +Y Y2 17 6529.89 +Y Y2 27 4785.34 +Y Y3 7 6197.41 +Y Y3 28 7217.24 +Y Y3 23 4520.69 +Y Y3 2 5334.48 +Y Y3 18 5525.29 +Y Y4 24 6275.86 +Y Y4 8 5710.34 +Y Y4 3 5287.36 +Y Y4 29 5909.77 +Y Y4 13 6344.83 +Y Y5 14 6066.67 +Y Y5 30 7086.49 +Y Y5 19 6397.7 +Y Y5 4 3739.37 +Y Y5 9 5419.54 +Y Y6 10 5419.54 +Y Y6 25 5049.43 +Y Y6 15 5419.54 +Y Y6 5 3859.77 +Y Y6 20 5948.28 +Z Z1 7 5282.18 +Z Z1 27 5177.59 +Z Z1 13 4445.4 +Z Z1 25 6249.71 +Z Z1 19 6537.36 +Z Z2 29 5831.32 +Z Z2 14 5099.14 +Z Z2 16 6589.66 +Z Z2 23 4629.31 +Z Z2 5 4282.76 +Z Z3 1 6223.56 +Z Z3 21 5726.72 +Z Z3 30 6979.31 +Z Z3 8 6118.97 +Z Z3 20 5700.57 +Z Z4 22 4229.89 +Z Z4 2 4994.54 +Z Z4 26 3164.08 +Z Z4 15 6825 +Z Z4 9 5445.98 +Z Z5 3 3556.32 +Z Z5 11 4441.38 +Z Z5 17 5075.86 +Z Z5 10 4236.21 +Z Z5 28 7687.93 +Z Z6 12 5525.29 +Z Z6 6 5831.32 +Z Z6 24 5818.97 +Z Z6 18 5974.71 +Z Z6 4 4863.79 diff --git a/data-raw/ZimmermannTb8.5.txt b/data-raw/ZimmermannTb8.5.txt index 6cbedc59..3843e5ec 100644 --- a/data-raw/ZimmermannTb8.5.txt +++ b/data-raw/ZimmermannTb8.5.txt @@ -1,91 +1,91 @@ -bloco trat prod +bloc linh prod 1 9 761 -2 21 1536 -3 30 1052 -4 2 1113 -5 3 1959 -6 67 1414 -7 80 2213 -8 90 1145 -9 3 1894 -10 115 2356 1 5 1516 -2 20 1888 -3 1 1695 -4 41 1357 -5 57 1503 -6 65 1279 -7 2 1930 -8 91 1194 -9 1 1695 -10 114 1450 1 8 1692 -2 2 1838 -3 29 1080 -4 42 1219 -5 1 2085 -6 4 2077 -7 79 2653 -8 89 1920 -9 102 1885 -10 4 2191 1 3 1563 -2 3 1818 -3 31 1443 -4 45 1135 -5 2 1454 -6 68 1586 -7 3 2054 -8 2 1415 -9 101 1433 -10 117 2351 1 4 2019 -2 4 2210 -3 2 1472 -4 43 1076 -5 4 1837 -6 1 1846 -7 78 2361 -8 3 1589 -9 105 1803 -10 2 1687 1 1 2003 -2 1 1866 -3 4 1745 -4 44 1384 -5 53 1873 -6 69 1846 -7 81 2361 -8 92 1589 -9 104 1803 -10 113 1687 1 2 1671 -2 17 1786 -3 3 1680 -4 3 1516 -5 55 1243 -6 3 1775 -7 1 1849 -8 1 1840 -9 4 1975 -10 1 1757 1 6 1245 -2 18 1756 -3 32 1123 -4 1 1773 -5 54 1212 -6 2 1728 -7 77 1885 -8 4 2062 -9 103 1879 -10 3 1879 1 7 1203 +2 21 1536 +2 20 1888 +2 2 1838 +2 3 1818 +2 4 2210 +2 1 1866 +2 17 1786 +2 18 1756 2 19 2037 +3 30 1052 +3 1 1695 +3 29 1080 +3 31 1443 +3 2 1472 +3 4 1745 +3 3 1680 +3 32 1123 3 33 1632 +4 2 1113 +4 41 1357 +4 42 1219 +4 45 1135 +4 43 1076 +4 44 1384 +4 3 1516 +4 1 1773 4 4 1881 +5 3 1959 +5 57 1503 +5 1 2085 +5 2 1454 +5 4 1837 +5 53 1873 +5 55 1243 +5 54 1212 5 56 1509 +6 67 1414 +6 65 1279 +6 4 2077 +6 68 1586 +6 1 1846 +6 69 1956 +6 3 1775 +6 2 1728 6 66 1546 +7 80 2213 +7 2 1930 +7 79 2653 +7 3 2054 +7 78 2361 +7 81 1812 +7 1 1849 +7 77 1885 7 4 1835 +8 90 1145 +8 91 1194 +8 89 1920 +8 2 1415 +8 3 1589 +8 92 1138 +8 1 1840 +8 4 2062 8 93 1418 +9 3 1894 +9 1 1695 +9 102 1885 +9 101 1433 +9 105 1803 +9 104 1451 +9 4 1975 +9 103 1879 9 2 1675 +10 115 2356 +10 114 1450 +10 4 2191 +10 117 2351 +10 2 1687 +10 113 2180 +10 1 1757 +10 3 1879 10 116 1605 diff --git a/data-raw/ZimmermannTb9.13.txt b/data-raw/ZimmermannTb9.13.txt index e829bb41..efef122d 100644 --- a/data-raw/ZimmermannTb9.13.txt +++ b/data-raw/ZimmermannTb9.13.txt @@ -1,28 +1,28 @@ -rept micro dens imseca -1 0 0 2.9638 -2 0 0 3.3324 -3 0 0 3.3927 -1 1 0 3.5515 -2 1 0 3.8698 -3 1 0 3.4713 -1 2 0 3.4014 -2 2 0 2.9494 -3 2 0 2.9638 -1 0 1 3.6425 -2 0 1 3.281 -3 0 1 3.7324 -1 1 1 3.4886 -2 1 1 3.4472 -3 1 1 3.5575 -1 2 1 3.2553 -2 2 1 3.7753 -3 2 1 3.8768 -1 0 2 3.6599 -2 0 2 3.8075 -3 0 2 3.9112 -1 1 2 3.7016 -2 1 2 3.5611 -3 1 2 3.1523 -1 2 2 3.6484 -2 2 2 3.5775 -3 2 2 3.659 +micro dens rept lms +0 1.12 1 2.9638 +0 1.12 2 3.3324 +0 1.12 3 3.3927 +1 1.12 1 3.5515 +1 1.12 2 3.8698 +1 1.12 3 3.4713 +2 1.12 1 3.4014 +2 1.12 2 2.9494 +2 1.12 3 2.9638 +0 1.26 1 3.6425 +0 1.26 2 3.281 +0 1.26 3 3.7324 +1 1.26 1 3.4886 +1 1.26 2 3.4472 +1 1.26 3 3.5575 +2 1.26 1 3.2553 +2 1.26 2 3.7753 +2 1.26 3 3.8768 +0 1.39 1 3.6599 +0 1.39 2 3.8075 +0 1.39 3 3.9112 +1 1.39 1 3.7016 +1 1.39 2 3.5611 +1 1.39 3 3.1523 +2 1.39 1 3.6484 +2 1.39 2 3.5775 +2 1.39 3 3.659 diff --git a/data-raw/ZimmermannTb9.17.txt b/data-raw/ZimmermannTb9.17.txt index 558b5275..6b7472c3 100644 --- a/data-raw/ZimmermannTb9.17.txt +++ b/data-raw/ZimmermannTb9.17.txt @@ -1,4 +1,4 @@ -epoca pota nitr rept prod +epoc pota nitr bloc prod 1 1 1 1 1066.31 2 1 1 1 1022.19 3 1 1 1 1137.93 diff --git a/data-raw/ZimmermannTb9.22.txt b/data-raw/ZimmermannTb9.22.txt index 9eb309fb..89534f64 100644 --- a/data-raw/ZimmermannTb9.22.txt +++ b/data-raw/ZimmermannTb9.22.txt @@ -1,56 +1,56 @@ -trat rept sem arcsen -F1 puro 1 5 0.36137 -F1 Antes 1 1 0.15878 -F1 Mistura 1 3 0.27741 -F2 puro 1 7 0.43161 -F2 Antes 1 3 0.27741 -F2 Mistura 1 6 0.3977 -F3 puro 1 0 0 -F3 Antes 1 0 0 -F3 Mistura 1 0 0 -Polímero 1 6 0.3977 -Testemunha 1 14 0.63305 -F1 puro 2 0 0 -F1 Antes 2 1 0.15878 -F1 Mistura 2 0 0 -F2 puro 2 8 0.46365 -F2 Antes 2 0 0 -F2 Mistura 2 5 0.36137 -F3 puro 2 0 0 -F3 Antes 2 0 0 -F3 Mistura 2 0 0 -Polímero 2 7 0.43161 -Testemunha 2 8 0.46365 -F1 puro 3 0 0 -F1 Antes 3 0 0 -F1 Mistura 3 2 0.22551 -F2 puro 3 5 0.36137 -F2 Antes 3 0 0 -F2 Mistura 3 6 0.3977 -F3 puro 3 0 0 -F3 Antes 3 0 0 -F3 Mistura 3 0 0 -Polímero 3 5 0.36137 -Testemunha 3 7 0.43161 -F1 puro 4 0 0 -F1 Antes 4 0 0 -F1 Mistura 4 0 0 -F2 puro 4 13 0.60661 -F2 Antes 4 5 0.36137 -F2 Mistura 4 6 0.3977 -F3 puro 4 2 0.22551 -F3 Antes 4 1 0.15878 -F3 Mistura 4 0 0 -Polímero 4 9 0.49422 -Testemunha 4 10 0.5236 -F1 puro 5 0 0 -F1 Antes 5 0 0 -F1 Mistura 5 5 0.36137 -F2 puro 5 4 0.32175 -F2 Antes 5 0 0 -F2 Mistura 5 4 0.32175 -F3 puro 5 0 0 -F3 Antes 5 0 0 -F3 Mistura 5 0 0 -Polímero 5 11 0.55202 -Testemunha 5 6 0.3977 +trat fung aplic nsi +benlate puro benlate puro 5 +benlate antes benlate antes 1 +benlate misturado benlate misturado 3 +captam puro captam puro 7 +captam antes captam antes 3 +captam misturado captam misturado 6 +derosal puro derosal puro 0 +derosal antes derosal antes 0 +derosal misturado derosal misturado 0 +polimero polimero polimero 6 +testemunha testemunha testemunha 14 +benlate puro benlate puro 0 +benlate antes benlate antes 1 +benlate misturado benlate misturado 0 +captam puro captam puro 8 +captam antes captam antes 0 +captam misturado captam misturado 5 +derosal puro derosal puro 0 +derosal antes derosal antes 0 +derosal misturado derosal misturado 0 +polimero polimero polimero 7 +testemunha testemunha testemunha 8 +benlate puro benlate puro 0 +benlate antes benlate antes 0 +benlate misturado benlate misturado 2 +captam puro captam puro 5 +captam antes captam antes 0 +captam misturado captam misturado 6 +derosal puro derosal puro 0 +derosal antes derosal antes 0 +derosal misturado derosal misturado 0 +polimero polimero polimero 5 +testemunha testemunha testemunha 7 +benlate puro benlate puro 0 +benlate antes benlate antes 0 +benlate misturado benlate misturado 0 +captam puro captam puro 13 +captam antes captam antes 5 +captam misturado captam misturado 6 +derosal puro derosal puro 2 +derosal antes derosal antes 1 +derosal misturado derosal misturado 0 +polimero polimero polimero 9 +testemunha testemunha testemunha 10 +benlate puro benlate puro 0 +benlate antes benlate antes 0 +benlate misturado benlate misturado 5 +captam puro captam puro 4 +captam antes captam antes 0 +captam misturado captam misturado 4 +derosal puro derosal puro 0 +derosal antes derosal antes 0 +derosal misturado derosal misturado 0 +polimero polimero polimero 11 +testemunha testemunha testemunha 6 diff --git a/data-raw/ZimmermannTb9.26.txt b/data-raw/ZimmermannTb9.26.txt index 6e9909b6..3c570f9d 100644 --- a/data-raw/ZimmermannTb9.26.txt +++ b/data-raw/ZimmermannTb9.26.txt @@ -1,4 +1,4 @@ -epoca pot nit altura +epoc pota nitr alt 1 1 1 56.9 2 1 1 55.9 3 1 1 53.3 diff --git a/data/ZimmermannTb16.1.rda b/data/ZimmermannTb16.1.rda index b3849f6e0b7f56333f10ecd5ee910ef6e3e92000..c2c8b8d490c38e151dedb89069c0b4080b68f27e 100644 GIT binary patch literal 369 zcmZ>Y%CIzaj8qGbWSJhB$iS#v|MdTFKNkkZO2#vcG6D9>?@w@GU@%}{<6y~k+`woi zxk#ugI4g6)iOhuyq<Ez=nBAIvrGpiPRc<Z2ROvP=g>eA`2zX3XTe$d=ty_cK0tTM8 zi_8w}eD4pb9MD+EvdY9e{J6-=#tmW$N++Z^TsT@io#L4kq5>9*ZmpXe{qxC1SG^m5 zSH+)M)U3vpqV(BAdlS?4q6$?WPnH`J1&?|v*4q@7PMph}Z6c7P$m4kCQl)>XiSJgU zH;N7yLklLwtPz^*bs)*T`DIbLY|p*mfX*G#;-NcJuTOgG#9LigU+{Eld9;C}$?<?g z<%#MHr)D@!Y~dE_h~CNk#NSZvX57_{j5=)7Bvoq6*(Rl?{`-^i=vYFQGAnQLwX-2x zR{As*R`jI?>Nvi*wp?RdRcyl9tTd*Znh9oRv!6{$d(>5^eW9`WtZ`6u4_nDTITofW Xp~3|$Hr?}&-kInpqQa<pEy4i+<rtE< literal 361 zcmb2|=3oE==GvgMUWXk7<R&jO6<oTYUG5XlQLPFS#=WZoY(?_3cTIGd#5;S%gOk@U zq+eS8;gw_Hk>Jw$wCQSH&Sv+|nEyV@^Tvli-TI&o0|R@^an_HFUt~T;H_H8BYJVOX z7!WsMlg;iKZ+g`k-Yt8;&UD?hYj==7ho;zZ;pOX#*GB!F6L)#fw9wG7&2dvz*Bo0g zJ^pUmvGpAKYv&i9P8T)YGhJYzS!Y|(t(PxVEm!(_TYGp-YAbxGd*tSX!!GA{pIS8C zJ=6c<?Y&#tU&#LCe_|h;dQn^=_?JX;MfB@Orfa*M*LE*oZgtQ7--57=-}@KcyAtUt zqm-xECvdo|ezp1c-KB^2zrOL)eeUnWWjSZQL>etMcl@LM*ZzL(x=A8ib}QB%+w2{c z@I+?rjPHJta~IjKh`4Jo`%~zSDdl~_ug_Zh)}G5dwrpce)^or9Htsid&eiozmYF9k Uo;opAwTs!WWYCTAVrF0f03&&>ga7~l diff --git a/data/ZimmermannTb16.3.rda b/data/ZimmermannTb16.3.rda index f2496e6ba12f61c5908f91a45528d8976913b502..d31ef88ffe9c412c6a983fc852e2e607db0386d5 100644 GIT binary patch literal 266 zcmZ>Y%CIzaj8qGbRLj`h&A_m>{^@^X4+bX2N`@~CA_4a5a~m8O7z`NLI9YTZH!xgF zF*RBE(ro$4g)gP#mM>voUs2U|lA%fS*J5EQj?5-ro@S1OUgj(pw+04=3<ic1yjs7w zjD<2e*iLZFWa(mcx!KGhdF2#Kjk>PpABWO3(?&rf&G?*2yGv{(oa7F>eUIW`jAJ>$ z@keOMSB4orCzhX_d8ljk1l8@%lV9v~I#K=Q{lq^RSpg<?g(-&>I?uUTXfe+YySID6 z*$jc!xazGQol-9SEUfjjr7oU5J=4W@Gw;z`uHP?A)q8zXNcN<JPW0Xz2Wl_A==sn; Yf64__BaxQ*NAFDZ6H(!urSs?j0G0G?ng9R* literal 238 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6&u)<s6e#lhW0!k<4m zP2xHGrAJa?M(e>>k`g~0Zv5M5C~?Eyo0<8ydAh>`ojLz3gjv#V*0-(t%_RDtE%bjg zBTvE>W@VSX%=%NpTDznjzA(Oh-g@gSM=85eZ{JJ<!><1~ih@oD6?Zw>v7UBvk(5p3 zQ8)Rz=A>okQG=%i&X<HHdw=R~SX2Mv)MugM;ETTLpT4$litsYx{&aCmf!NdOuMci% s+;i#*11F<hhtsqF8QY4Ns!UUPwN#XGt3%9z5Bv;A1Up{eU}Rtb0Q6gE{Qv*} diff --git a/data/ZimmermannTb16.4.rda b/data/ZimmermannTb16.4.rda index de35574578b4cc3121c092a74323c5bc9a39902d..2907c71101faaedfbe4a8284ff213e7b362d6265 100644 GIT binary patch literal 256 zcmZ>Y%CIzaj8qGb-10d^hJoQ?{el0*J}!Zwr3`-<L;~#9?>9IwI52KtI1`aIZ`m^c zU|;r?FIT=?7Qn#3?7QMHF9QTHDoya2>@#DQk%5}<rKCi*jEm1*zbx4AvrKo*#GSWZ zUQ**waLM51NNQke);&@vqH3Hpos;?h=9Lpm9;=+-yya2(@UctH<GBl%+ypPK6ZdlK z6p9L%<&=@RMQO_fPeBvyH(qA@z8;v?;dN1jv9@59@|0gCz6m=H<cdw_k18&_*f(cm z`@U5fbFZ(x79cnE%IDnmJli?y9VRnunJAmyU9_~YK_`H%VFAYsXMz7$*u@{c^H|O$ KBsMRnxd8xmv1`)+ literal 250 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6&u)<s6e#lhW0!k<4m zP2xHG#YaM7Mr-3Eht@ND9A*ix5o??|!N8bl@r;wxCPz)170hEKtHUjrTGC=TCxIv3 zq<76p%g&<)wFQ?i2~GC?)ZMVA-r)>;(d1?}W(kW7$4py|wQNhLF4)2|#jN2{TR>Dh zBb&lAPKTqe7rqoaWUfg1%^$FjX_l>!!Q+6vlc&#^-6hA9lVHE>P{q!luBx3!4R~39 z9##FBv8+Js>GanJeVAN1gPD)$`E@uw`=7yhZ0e+lNh_v@v0P!|-BQnxxA@N$4kiW$ E0J4o|jQ{`u diff --git a/data/ZimmermannTb3.5.rda b/data/ZimmermannTb3.5.rda index ab96968c10a90e7c41fddf728d08f486ef0884ec..ca3cee818a2f54b037e88591ff74b934651b6fe7 100644 GIT binary patch literal 341 zcmZ>Y%CIzaj8qGblv%i5oq;j?|NsA=PcU9!-KP-3AR1t=e!szmfrEjGLHRFZ1B-xw zk%Qs}MjjnS6}FiSl57o0nadg&zBDeI9n8WptKU;@f>g%Eg$oxjFsn5%Fq{z5m}nnT zHQVC?;{t{+4a`@VuQ0H=hklD|t&B-^xS8}*Zbj1UHq*ONtP<%t`Qo;WLV6aBix@c$ zu$}UZ?DEm<eYssI@u0SFkQ$%C;Xt++wm9AgjW6r&BsWfxiMuJZZ2~JV!>gSlS{q;Y z<|?WtE>K&&dcE+yxgtwAJv<w-A2du@)W*4i^C?S1uI4O<a2w89{=bfR>xsXu{QNLV zy~OHCL5GS1BWIp^z-6(osz+w{y?l_Y(ZiZ{`pY>x5kC=;tjp(5L`kg>__j+$sE6l> v&Y{ddN2UqJ26vsA`(xVehDkL%2}=|bgcuw8?my-FxuIUX$kifX0w@>(qa}z% literal 357 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6)EpNox(i-Wt1gg<|B zn$+{vM^a)&YvUn@(ldJ;q8QhRERoe=yK>~f0j?uC4rlm|$ZVPJUZ@xCmlc`iXE;HX zVOnd4k<=jxH-k3Ao<yeP8HXg&4B9Mv5*yRFvy1$a49^JdxSH8{QuU{+!!`RY2M)H+ z<VZ+kn!#$%W;y$%{gtIUF0AYk{Kh`~VfPI`G}b)du(*|xMP{3S+oj_QU#>+9R2_HY z*sIOul&{_1_1gJ`?WcgB;R039^*Hwa)(x2>xauBf)<1TQ|LP%oRj25)KaFo(WzDxW zUvo+w=T!fuONjx$r!Fwjp3-(}d$IhKYmK{<S+dS6uh?b6#^K;AQrWq4<p!67JfbO@ zUb-5M8@;=P9=>T>^hd;m*`oW?>8}ZG4VU<XnU6@Z$`l@&Iw@k(is@l2SD1RI*E47& L?tXTWnSlWSvp$uZ diff --git a/data/ZimmermannTb7.4.rda b/data/ZimmermannTb7.4.rda index e55314bb311c00474b79d90a37231c1f69388701..d8057ee77af775bf2c90478adf5249d6bb78aec3 100644 GIT binary patch literal 1026 zcmZ>Y%CIzaj8qGbJiggYk%7hXKNzfdS^v!M?$+=2>Hlw4eOtUW=5_slscXD_n!L{8 z2bg7!I+tF&(yY=Pl-Vjbap6l7wkwz2uE?*-oHa{+B?IHKhOcZ5mmQ?494>Y)Fv<M2 z_!NJz^A%gS#+NVs1G?t9t*Wb9d_nWYyk(gSmi0LMnq)3!P+aDttgI}Ma)_tLmq*x# z<w$0u1j}WXjDw+af&Zq=UuD9$AcL3LSBfFU#E6%Hr^msBaY7OUTdxr>PeTUdGG!kj zO^z$d7v&}kUt(Oqz`(#@#MZ#pz`!8Iz;Geu0t4f(1?>LiOM01dIK7OI&A5A&Wv!<W z%MFn$D?|Mpgm0|4FfBkh!M&{2)kU4PFjl4b(6W|a6V^^>6=?1iVdS{Ly1=R6m;p<8 zuYv-X;736Q<rW<Q*2q>N#vVqty&*h|r>i0saHzG5RR6d#x541L)Dk8pg9dq}i6S}2 z7!o%fF6sU>jWeR)ovD!4lEBToE550iJ+w=`eS>#dxZ-A+k1KN4yyRDJXcV9El3|q; zOYE^p+#F|GvJ55kYyOs$e!1~y$tETzS3_9_X4}ZRO?wMx%#2&S+hXUr;yKSPIzZqU zM@PquV}?s6d8$m#Ute0$BI3x!$&};U%y!JAWy;5P%TCpezHV(QygW|UJRaJS5eFC^ z#~ftnddB)vY}vtNCBbmj%?>Ls3v~C!T;%9oyi4q?nD6_2AB8k^A80=o-M9R>0PCu_ zY2E$TAH96`=P}F6&KE9Ulq?U<&NSxop2cf5b@9}E6~Vr(YqO)KapZ2h$zY&(pu_Eo z?}Qdbjsyk<CesC762}a`Uut06nK~`d)tjs68AEN<)E>8mf(y6~&zSTpEN9g=@0(r1 z3Z4IMObrM+x$M=$b;8=s{O1mxnCe=7&~>th-yflv<4?UMTmPoqj%*QDWGz`b$tgBv zd4y4xT~F0Hk+iJq1y}bjh!B5QdV|e<N7l-#-20x^*$Vn(-(>FJ(PqeY+;~n&!U7%z zos&8SUb~H7RJ=K)pv1U#+MCU1d*rG<i@m?vm=y8Z=1PU}!WD-)s+TfW+>MQUn-X_m z=WD;t>0M3vYP<9@SDg@js(h&I=v6Me2qyikeUW+91-CA=P7QhS&_iYUkJ6_ummPIO zW3`$7@AsO!c&bBT_@_BR*~t|~jQ?JXaO^mc;q$)x)Dek|SIjaOi6lMUqTiBu=7`{h z^S=y3H@mv7kEpr*F<U2DrEG%BnW-I{v;Q2_@0`=nRJ_ge&$5nA@n_<*Ew~Qz^S@ZF zDW-dbb;+XVK~MRQDo>f1=pi1c+0({g8UCqcO2>;97k2f%O4{GfuM}xG<ZH63zd1#C hT7#}ugxmiRcjI>xKUhy({l9ys(i{zs<eQ5H8UO?$$S42+ literal 975 zcmb2|=3oE==G>5I50O9#x%BI|SFGGRZT40{+YFXTi`TJovTJp9E$X->t8*h~sY7h^ z(nTD*1Y$K7wRb5gX`PsmQl6e(9=5t&sb|CTMRKd!IjS@lO;=iU+y42V=jv~G>gN5A z+4p|`oci<2L<KK*NX%OHa+d%1%n!>m>tz3lX4b8hIhK`O9v^RWQ~dS&`+F8I-syX} z#yCOp+|N}BTNsZ1vG{Og*RzYZp8au58q8Cwf*AUPIae_FFtadhZIC)p(y%<1or5Wj z@fD*nqvC;>12PA49GK^=K2XV-CGzm6*Ogp{`^5qN?)G0Lrt_DsHkc=H?7{ILygf^$ zKJzSyV=ii{sMGtDeW8Dir)<_V#d5V{2GXXd4coYSt{;fdHe6oSbKU-FlvmZ`>c@MV zUl_KmcGbOPu=Ju<uUY06Z)KfczD%8o$AV10OgoygbwcW-t6pK!k#AF4Prg#f=8SxD zSVdm#r@_f~PdlGaiIeyz*UW$jWyIPnZ8&;&??%T+`&C)~YpOLSvb_Fo|2K9?!@354 z#{Eo3xu$3Yta6yi^ps12D?}q;rNdOF%OWen7PvJ=u`c`1|Gw&r{j3`9508|t2nl9& za%^>JiBfXX6<j#2L&)6gjz;0)BfUcAUNPM}#0qsEMIG7Nk=^RbXE(EX)9Q++I@5OT z`}p|dgwsZi2g82Mko{BidFsWJ?_M$2`23GBx3v7(^YmK2sTF(P#y?`uAMRY&s#Cgb zZvVOMKUcdkv(HTS>0#sBll<78)n3%@eCgZ8%dH(dEw}G|d-cq|H@>`S+s{6#YCZOF zy~2?>o7FAi`)*ENn)GkwwAU%q;~qUX7GJ+pz_2*(e+7GAWZArq;yvGtYQiI`qWiyZ ztj^w@SjjJa^ZuE?%f#7!)@}QoC2W!MO>d+Ad28*~xVqjC)9b3&t$z7h*=j!bJNE6L zBOacpK6iSFtL>d{u{Qszb(PkCDd;*rxwf+5wWavA4}b0^=eO`(Gpyd-eg1Q4zw^6e z{%2}G9a7#<lg4r<Kk4z}_8s$npMLhe$h>C$`MItU{xWZ!?9cn3bC*6kBYvCLm5*&F z;;;EXd;L!AdxVARqZ7Uzb{p*V9{d!2*Ij+`O74SFkKTi8UP>36ckFtyZTB9z$ET0h z{X1N4cYdwF_jy)&uT<XG-^hJbm0WJ}esNX5%}&jCic*hjQ|!e{C;k1p;LGL{{I4}0 zpXueS-z0BbKd<U{u>AFZ5%Dp0>+E8_s6S?Q{&b-4o=dq?9*>H!^>U3V>cYQgE$#Zw m@Up#<>0a}iKNBUblbts{o2L@+q5a!${Z)%kB;Dm;U;qHz!{ZwO diff --git a/data/ZimmermannTb8.5.rda b/data/ZimmermannTb8.5.rda index 0568220dc457fe2b5061bb5c701c6bfda6622fd9..81141bb13d9698a7edf800e26d3c1bd5aea938ed 100644 GIT binary patch literal 748 zcmZ>Y%CIzaj8qGboYxcF%E03K9|k_Sh=hdNr{8UHXsQ4I#l<DW!NtYJ#leB~0F!%m ztjz9=E|Hrimo>g9JHC?WHCsOA;!6fz24;uM<tuEK&A4)_t*w_qva4<h+Y-qsZM}}Y zJ^~CNz}5gF8KjuB`u~PX$-kQHHj_a@+1JE~!N|}+;e<pFhlwH23}-brMn)wM-&L~% zJ~bF+F#8%YFfhn1xFE&Wz_@^M0oyF&p!J7Nzpzukc=YPIt8O~G&g{}X=V>(KgK*s1 zjXLkbCv$9m_FHd>V}kJAE$z`B{8Aix)vg>ZkEQM?MyfQ0{cl=VdUM5%Q~QGsZd-M9 z*Y%~77^H7*e)3(lSX^qJro*wHN_<8F-6t7~9nUQ|GS7VS!SkCqbQXL!vzx=d!gbZ_ zGregtMTwsi84gX^*&s3Zs^7hrQhXkaCAycHO;u$bWCb&Ly_dLkYU^EDyt;d$&8atu zcUNxwR(yB)ORY`UHdj8IX>qdeexu%U|Ab{+N}VZ2C+8~fR+DPvjA}mI$IQdb7%kAb zQAxF5QG{3F@PQXz^W8)y2?-`HVXfTR=5sn^BPXYVit4MN4#uVgW&_3<3}+b97%Y#t zJQoz6<KlPy(9;)^S0-#($zayToRcs?t!;wIC82E>g9TJ>sHARStiI)zJAY3_D39k; zhg5@qmo<fx>@OX886bD-VccJ%6eUZ+z?lv{3QJv;digjUDjIgl+3=dA^GtBzSS-0E z!7Fn?nu~|X5{E9wnF|CIma1xS8;PaP+_F$nXY;cuLBV;e)?N|6B^z@@#K3o<S&Laq zeChgsSC7Tbj-S+@B4APTx#9n<&}PmT=5Eejmb+!NPuR?MUnG-U!Du1Qzeu#Vd%`EC zvb=*08>ZZza3l4nE4SPG#r3Qg70<<NeX{2E_vH37RwCaR?(eYD48C<nPn1*Zme*k? wl_R>ZS!c%WyrFb^>g`h+yLGtUf1VVav$9zuR3Wyr{$sgHa4RS0i=!3+0CD?3lmGw# literal 772 zcmb2|=3oE==C`5ygM|YH>UMH#2)eL}ihkU_DCvn_`Sc@NtW%SZMi@vQo2lG#ab`<O zUyqqsiJ6#$${&vd2O=UO0wOH>T9>v$!P5GM=66qP^WP_A$Q<`;JNtd_-?IC+@0OdJ zTN$MtJC@|c;rn8i-i!E-6>j!|f}*l5cW+i7O}eMO>+<F8>OqCk9DCdEh%7G`Op9Jv zS9RLm(`n1Zt&`s>-u8Z$FZ^5n`}V@y>z3}Fuz$Y(83F4HK}*e(G?KI?1sn-F5_Tj| zWu=GLM3as*p7$0zbi)hMuk4IDJ7xCjDK<&b3!fhf|E3)DwS3karJJd1bidqgwfr(^ zu8Oq7Inf`&Gg{xjR<q{WZ@->9r8%W=P3aBCO?FS_G@gHc{e;XBw};kD@7`C+ZDiZx z@nX&5l;bDPO^Q|8?d7H{q?VMt@UuU|;h%zc-r8+)j*xeMXL%&XeO~?lxhb|EzE7UZ zB=6LxyWahGtEKh-cb*<b-iFCnWzy0Nl1&e0HC=5v=@Ysva!u5lsKzYA;HlYWtIbxI zEwDPXqpCf$Jybnlr+NEo|4p+}OiyNYReKkH)eO75W?7_faeij#-aH;@MpI@ft_@6C z#->dS${YqxjD8N2KP6tgdU(_8*SD)uH_vo`-}--gq>#|_Q$q87ykfFF)_nDh+0XfR z_L0z;Gj8tCE-V!O7ul)Juc{YuVdK32oqyR?!{T%L*RM2vmAS{QHh$uL&5fN^v&>cO z>YHmXp3h<}<zH}~>6`Q3t;b(H*S%(u&RLxKXik*9K=I8T${!^^U3b4Ae{SyYj^a2* zd*$<o|IL3O?==7MjrU@&j>WvXQNED#|B3l;w>Ry2eShP*1?PM_KhJQN{cB#ZzPDWH z`aXx_GS3^o8a-?K_xi==U(DHO9MA6Wv<f@EJ^3s1FSoy^H(xM(esuW@{?8eErbHaB zV*RW4{S<R~&Cz9dlj3TRmOP!KF{MaVXOZanwHk5Xye3<hz4+k8|0qlR|LdhEnf~hE fU#B0Lb7}34kDC2KEj1Un)iGyIopP#<lYs#MQ_z2% diff --git a/data/ZimmermannTb9.13.rda b/data/ZimmermannTb9.13.rda index d729dee22f64344dadeb5d2688fd24de94cb56a9..3086f7b31ca008ec460236790e1cbef95de17ee7 100644 GIT binary patch literal 520 zcmZ>Y%CIzaj8qGb)IXJRh=EbL{{R2||G4*L?tOIphH1(E{Cm&*8rEFZJ<<Q5*x>j) z=lb{R8yL$X9Wp&lq$FmUFfdNIz+jXi(bl+t!Ni1d;j*?_CJdLaNV2coFss>P){KRl z1Tq*HG8h;b7#Lq=@G>xDd}X)*;!K(%DaE+hmzP1x<gx>^0|Uc_lq3dTDaHl73=9m+ zd;tO+Zy7j+n*|&tjxf$zaZ`yg!&KCx(`Z+=(W(s2L#&JBzlls@TB72&Fl^s71}2Ay zhJ<*>wOtMh9b5te6U3*mv@$qwhI9*@Sjb@PobDB(pcJ8bio^4YoXV50N(@gD+}IeC z%UQabg#yf$3cc(QX1}$bk*EGPr|JcN1zACs=;hNltlX;IEmk<~Rz>=@1P46@o{wx6 zJ1rUxGng<)PFt?FD~$E#2i~NOr_XeFZIN|%+~1rpzxCIf1)nt5PwC|mI8~F)rmx&) zexhBN_x@p>y;mwu{m4@LQ&jZhx8yEs9qqJ*O|Q2XY?4aV;tk*k`+Qb2;-<5**y<P4 z8<M`O=bgQERO(XIe%TdFY}S`LTm;XgUHru>Cd*YL@X77WYko!1h_C%Wzut3DYkXh7 zh)0O2Q&D#Jmc4>Dk9%DjYQ2t0%Jm+f^<{tm5uXOvl`TxX`GR#D8cYr`nyW2wP*-x$ a;0)W#x#RV3&i~yzmF8%8h(9$+WB>r`x6W7q literal 460 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6&u)<s6e#lhW0!k<4m zP15<w(<>=4qt&si!9;(;G`7{OFWI>+%<Fw*wr$RpO;_e5P0&8LNg&Y8S>iCqF$1^D zCuYr=9Kmy$-CS4KaHq<CjuXGypP9R<m>VeW?3O%P8xp`=q;$Ey<i140N3jS^V;{|r zatB&xb{sg<Vi;<B-~jul2Ik+_tdGBOZIRg#Cc|TS^Vh+~=%fE$dPWAa&pXqlU2mUX z{NT6L&Yw=ctC_zCc7Ip9E@o9Qn{(ENJ)g=F<_n(xmfIyAW551Wsow1-Rlb;Sruph= zBGw=7{k!xpeR&u2_wJ{g&Zor|KA2Zi{>%Jr4*R@I&VLQ1?#t}hk@xnG)Xt-g=YKf) zp1!u5@6Van+xI{D|MI}=xScuL=KGoDLuB_)-}JQc`g@s*=QbLDzlEP{Tpspu|GeYg z?0&@yUMZEc$Ne==3_riV?7__K${$Ks?_pm5`cN?Ytkw&{DRD`8S~`xK99Sc}g1EgB zxQdJ?cYjJ0(p*`2bc4a^GrE4helEuSn>F^w@TaM1s2Z3WG&Gv@EqLzbspEOYTbn7X Rk?p@d!@kGjZ)I2*7yw$E))xQ( diff --git a/data/ZimmermannTb9.17.rda b/data/ZimmermannTb9.17.rda index 972f0f23a34f0c6b48b9af7b17fe072e78f0c733..4cbaf5a469a234ba458de921ecadc4dcda94be37 100644 GIT binary patch literal 707 zcmZ>Y%CIzaj8qGb^!M9i#K8Rj|NsBSK8za*Z5Fv4GcBnv|GWG9|NlRElxNgR-AnA$ z;8A8hz+}U^bavuW&MCKid8Mixsv0sFE|@UbEPT;$*_VOg!dDYXInTvcE-qGU$Px(t z=p*vQaj^sAE4Bs(1_p);3=C2XQVcvT5=@B(YQmh$I6DpqGq|<+FeNZBuq3E4FtBuq z`XBW-^<8rLN`|e&i3^MiXEiQhYhYkp=GM#0z`!<d!A;-N=d;C`5}6k?a0xImi6|%r z#5PNxXIinWi?MfuGh=gxk5h)<E7RqIa|C9nF$-K4Fyq{EYmUr|^T#+W#NKI`UG8O! zZ*9Bsr9&t*(kp?}H6#Ct__gJmT|}l<G$;g{2yuV7#%fxyW|pA{M^s76K}k8*uU-lY z+PvHMwVX(pFw0k^HEN3xW7cOagYcsFmW@qyCDTJ?{>bS#CO>)nk!R0pLC1+f$NdiE zONg>DMld@4NXqxV7qRR8^}u*Ge+Ip6)w&DpD`ubHzC~F1fa&2Yd{$r17*2`Q<ScAi z^=PG&v;RV)+u1rri_hI%GB-S2+w|>BH?H=8;#tMK%Pa-D1Z6vKuAO1?fu+5oAw^PA zImzJiBBf|Oof)r|@2~kKyL^@lr>ioDg2oHIJ$kiq2YC~CJ@;p^P1374VBpnsX2q42 zd5gLILVu?U2Ao;Ex_G~ffQa$a<7x~{j2;RN6_cL(opCjrWt>^QFfQo!r@&8JS>kFQ zZ2$A}`<knkbL4+Y*z(-rPn|pEL4dNyC9#B;M>{&2x+DB~@1`EqezvlxRH{E&lXcGg zOI*_umwG(9pV@xtrj7W<hF4#nO!S+ryR2WA?dz?3Ew;}B&d;k*Onq0-CCU70X(|Wv zxuBPlH;%AK$!~mE?|WvClWRM3;&a7gcMLhSlb<ck&pq3v^_a<U?WCQ>$qM=<PFrMB O|BDy7S_Di0C0YPb0VtjT literal 665 zcmb2|=3oE==C`4?8Nq=f`zk$K*hCzki_Kl-ykKpB70Wq=7Ym%bri2)MnW+|WGCsaJ zsq2>4zsYL)&(?3fpc*N&W`XybM+-b$d0zyvJ8Japvbf^8>ie^5{UZsA9u5=Yii*zJ ze*aVRy=Kq%WB%4{x_sQpK1psTPyFaNoP6Xz&zU2?cG%Sv9(!J_ZFlqi{({UiRwk!r zeB}5(d#Bxrt$QW4KkZDu|1bLY_L=e@cCFvFw>at7+29IZ=Us+tq?Khm)24^dyZkxo zs?8>Ck$@drZy%hwkhl3t+vyu^`Sxk&B@C-xreD{Q{CeSC=S}Y=dPi=w{#m~FpRD2D zNqKA+wO_XFk@NKLOl)T{Tyk$S>uPzODZj<uuD`uMsBUxKe<9fgXT-Mb`Y~-i+fnuT z&*wDX*9>-y$tiQu>H2e^@*Y$D(uUe|Cl8m$1=RgH^XuXVv(%{vW#byP`e#Oj6gn(d zpBNq$|M0b*>UNhKoLYOuGSf9}ujw}gEP5rv>QO6v@0qCP;({yNB2TGYaPM7^|5LDF znS9rVO0T)jF`2?&r{z70+n#kmIF}**mF>I9zj)ThIo>aEJY3GR<C6c*?fd;!n+L2f zklc0SL2i@jsk!2hw_N<nduFQ%YfSd)TQYr*@4aGpr6VG^-GXtCH%on?<X54}FZ%fz zf2I`f_d2R1w6fs7ve?x54CUV>f2lrev=?K0cYFQ<VZk%bwF^Gh2>pG$_<;Dzhc?d` z<x07}N6&7s|H<`ra@mK8we40vQ+wmt{>;?+(Q}_M{^Rr;&;1t0Z|m7Hwg2qCx$#N+ z-xR-&Pul#hgq>M0^7f3T#(>k`&bNr%4ZCwNK--Per#$3cFw^xlRiz*ECW*~z=_tP< dFE4d^i_E08a;?iV_|Lu5Kf2|Y<9AL51^^V8O-ld( diff --git a/data/ZimmermannTb9.26.rda b/data/ZimmermannTb9.26.rda index d712d9bceec4d11a60ffbf67549c29b2e0ed6aba..712c524c7f050681c57d741c67d6e4a31a7b8d1c 100644 GIT binary patch literal 353 zcmZ>Y%CIzaj8qGbJp5&r5(DGL|9}6RdvGu^S}M5Iixk+a-)(SUVK881;9ziIV`Si9 z+`t&^+GFIo<d%b!34;j(uO!2Ts>V)@6U<i_z<^`XtXayb%nr7`3=CBb84PwZ2bVf_ zon%VkIxEJ}laVC#%0o#(fr-(p<b+EA6UTxeP7WXabc>0H-#<91FjwNq=Y2e8T5Tm_ z0@{HqOG6TN`}1XaI;(ncgfj*1ypwbMdTmEiz=9<T)$O+x*jqF*e0+{f7P`2wQ7f>e zF*<h&%f6e>U(VrTQAvm@+`s$a<cZxU?f%Ck{4=O^RQx!@z^AocL&2fX`@n?4v+H|L z=4+=V3Lc(TF)QEpueacu?`O62FEKB4V6OfbRzG!d%2XXy75TV2u65gPx<B8|S;qR! zw_w#@c8L|dk*E7_t8~v~F=5?q?t3CY_ejO!YN6<#Vy~H*G?Yrr=0AGpv7AdtqHeN_ F0|4ihhvNVM literal 337 zcmb2|=3oE=X6~X+gGXHtk`fXUk`mIA(ioK3*u>Nn4xTu0=m6&u)<s6e#lhW0!k<4m zP15<=b4Eg9Myq32gNgoxX>6-mU$S#unAiKrY}=eGo36}BnxK7flR%)Gv&3PJV+L-Q zPt2M#IfCahySc8e;ZBwP94CIYKQnhzF*i`$*)4gpHY9+#Na=F@qT0he!CrgV3li0o z42%<fLir6oG}=6P5S+uq#CLDL;+E^1Oaux(bk5;q*(_6I=6tmB9K*p#_Vdg<3J)Ie zF13|X*m7R7V~=@=t<U~)ewRDhYAx@Vvl-s!PO}TyuOD)cJ<ZPNzi~&^j-3Ie_X2*` zEO_^+c_;Iux-Tp<r_Y$p<vl^i;NX>}KTljV+IK4KXE}D}bc^9lp<*wuZlQ}lk9AJz rUvHkt;l=JFaN6-DWA=gKr7F`@UM&@6-0HymU!I}#d77~l3j+fH8X%4c diff --git a/man/ZimmermannTb12.32.Rd b/man/ZimmermannTb12.32.Rd new file mode 100644 index 00000000..4a69a039 --- /dev/null +++ b/man/ZimmermannTb12.32.Rd @@ -0,0 +1,48 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb12.32.R +\name{ZimmermannTb12.32} +\alias{ZimmermannTb12.32} +\title{Competição de Cultivares de Feijão} +\format{Um \code{data.frame} com 13 observações e 4 variáveis + +\describe{ + +\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição + da observação.} + +\item{\code{irrigados}}{Médias nos ensaios irrigados.} + +\item{\code{sequeiro}}{Médias nos ensaios de sequeiro.} + +\item{\code{geral}}{Média geral.} + +}} +\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. (Tabela 12.32, pág 264) +} +\description{ +Dados de um estudo em delineamento de blocos completos com + quatro repetições. O experimento foi um ensaio de competição de + cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro. + São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro + e geral. +} +\examples{ + +library(lattice) + +data(ZimmermannTb12.32) + +str(ZimmermannTb12.32) + +xyplot(geral ~ geno, data = ZimmermannTb12.32, + type = "o", jitter.x = TRUE, + xlab = "Genótipo", + ylab = "Média Geral", + main = "Competição de Cultivares de Feijão", + scales = list(x = list(rot = 90))) +} +\keyword{DBC} + diff --git a/man/ZimmermannTb12.33.Rd b/man/ZimmermannTb12.33.Rd new file mode 100644 index 00000000..c51505d4 --- /dev/null +++ b/man/ZimmermannTb12.33.Rd @@ -0,0 +1,48 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb12.33.R +\name{ZimmermannTb12.33} +\alias{ZimmermannTb12.33} +\title{Competição de Cultivares de Feijão} +\format{Um \code{data.frame} com 13 observações e 4 variáveis + +\describe{ + +\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição + da observação.} + +\item{\code{irrigados}}{Totais nos ensaios irrigados.} + +\item{\code{sequeiro}}{Totais nos ensaios de sequeiro.} + +\item{\code{geral}}{Total geral.} + +}} +\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. (Tabela 12.33, pág 265) +} +\description{ +Dados de um estudo em delineamento de blocos completos com + quatro repetições. O experimento foi um ensaio de competição de + cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro. + São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro + e geral. +} +\examples{ + +library(lattice) + +data(ZimmermannTb12.33) + +str(ZimmermannTb12.33) + +xyplot(geral ~ geno, data = ZimmermannTb12.33, + type = "o", jitter.x = TRUE, + xlab = "Genótipo", + ylab = "Total Geral", + main = "Competição de Cultivares de Feijão", + scales = list(x = list(rot = 90))) +} +\keyword{DBC} + diff --git a/man/ZimmermannTb16.1.Rd b/man/ZimmermannTb16.1.Rd new file mode 100644 index 00000000..42353c10 --- /dev/null +++ b/man/ZimmermannTb16.1.Rd @@ -0,0 +1,54 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb16.1.R +\name{ZimmermannTb16.1} +\alias{ZimmermannTb16.1} +\alias{ZimmermannTb16.2} +\title{Análise de Composição do Solo Aluviais} +\format{Um \code{data.frame} com 7 observações e 7 variáveis, em que + +\describe{ + +\item{\code{origem}}{Fator de níveis nominais que identifica o local + de origem da amostra de solo.} + +\item{\code{mo}}{Matéria orgânica no solo (\%).} + +\item{\code{fosf}}{Disponibilidade de fósforo no solo (mg + kg\eqn{^{-1}}).} + +\item{\code{pmo}}{Posto da váriavel \code{mo}.} + +\item{\code{pfosf}}{Posto da váriavel \code{fosf}.} + +\item{\code{Nc}}{Indica o número de pares de postos concordantes.} + +\item{\code{Nd}}{Indica o número de pares de postos discordantes.} + +}} +\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. (Tabela 16.1, pág. 327) +} +\description{ +Dados de análise de solos aluviais, que apresentaram pH + abaixo de sete, referentes à associação existente entre teor de + matéria orgânica no solo (porcentagem) com disponibilidade de + fósforo (mg kg\eqn{^{-1}}). A amostra tem apenas sete + observações. +} +\examples{ + +data(ZimmermannTb16.1) +str(ZimmermannTb16.1) + +mean(ZimmermannTb16.1$mo) +mean(ZimmermannTb16.1$fosf) + +with(ZimmermannTb16.1, { + cbind(pmo = rank(mo), pfosf = rank(fosf)) +}) + +} +\keyword{correlacao} + diff --git a/man/ZimmermannTb16.3.Rd b/man/ZimmermannTb16.3.Rd new file mode 100644 index 00000000..4240a666 --- /dev/null +++ b/man/ZimmermannTb16.3.Rd @@ -0,0 +1,34 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb16.3.R +\name{ZimmermannTb16.3} +\alias{ZimmermannTb16.3} +\title{Teores de Matéria Orgânica de Solos de Várzea} +\format{Um \code{data.frame} com 14 observações e 2 variáveis, em que + +\describe{ + +\item{\code{solo}}{Tipo de solo, sendo A - aluviais e B - gley + húmicos.} + +\item{\code{mo}}{Teor de matéria orgânica do solo (\%).} + +}} +\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. (Tabela 16.3, pág. 337) +} +\description{ +Teores de matéria orgânica de solos aluviais e gely + húmicos. +} +\examples{ + +# Postos. +rank(ZimmermannTb16.3$mo) + +aggregate(mo ~ solo, data = ZimmermannTb16.3, FUN = mean) + +} +\keyword{TODO} + diff --git a/man/ZimmermannTb16.4.Rd b/man/ZimmermannTb16.4.Rd new file mode 100644 index 00000000..2e8f87ab --- /dev/null +++ b/man/ZimmermannTb16.4.Rd @@ -0,0 +1,47 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb16.4.R +\name{ZimmermannTb16.4} +\alias{ZimmermannTb16.4} +\title{Hastes Mortas de Arroz por \emph{Elasmopalpus lignosellus} L.} +\format{Um \code{data.frame} com 9 observações e 3 variáveis + +\describe{ + +\item{\code{cult}}{Fator categórico que identifica as cultivares de + arroz.} + +\item{\code{nmort}}{Número de hastes mortas por \emph{Elasmopalpus + lignosellus} por parcela.} + +\item{\code{posto}}{Posto da váriavel \code{nmort}.} + +}} +\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. (Tabela 16.4, pág. 341) +} +\description{ +Dados de um experimento em delineamento inteiramente + casualizado que estudou cultivares de arroz, em casa de + vegetação. Os dados são referentes ao número de hastes mortas por + \emph{Elasmopalpus lignosellus} por parcela. Cada cultivar foi + repetida três vezes. +} +\examples{ + +library(lattice) + +data(ZimmermannTb16.4) +str(ZimmermannTb16.4) + +xyplot(nmort ~ cult, data = ZimmermannTb16.4, + xlab = "Cultivar", + ylab = "Número de hastes mortas") + +rank(ZimmermannTb16.4$nmort) + +} +\keyword{DIC} +\keyword{contagem} + diff --git a/man/ZimmermannTb3.5.Rd b/man/ZimmermannTb3.5.Rd new file mode 100644 index 00000000..61755ea1 --- /dev/null +++ b/man/ZimmermannTb3.5.Rd @@ -0,0 +1,59 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb3.5.R +\name{ZimmermannTb3.5} +\alias{ZimmermannTb3.5} +\title{Fracionamento da Adubação na Produção de Grãos de Arroz + Irrigado} +\format{Um \code{data.frame} com 32 observações e 3 variáveis + +\describe{ + +\item{\code{trat}}{Fator de níveis categóricos que representa as + formas de adubação: 1 = 80 kg/ha no plantio, 2 = 40 kg/ha 40 dias + no plantio após a emergência (DAE), 3 = 13.2 kg/ha no plantio e + 66.8 kg/ha aos 40 DAE, e 4 = 13.2 kg/ha no plantio e 33.4 kg/ha + aos 40 e 60 DAE.} + +\item{\code{rept}}{Inteiro que identifica as repretições de uma forma + de adubação.} + +\item{\code{prod}}{Produção de grãos de arroz irrigado (ka + ha\eqn{^{-1}}).} + +}} +\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. (Tabela 3.5, pág. 54) +} +\description{ +Dados de um estudo sobre adubação nitrogenada na cultura + do arroz irrigado. Foram testadas quatros formas de aplicação do + adubo fazendo o fracionamento das quantidades em diferentes + épocas. O experimento foi instalado em delineamento inteiramente + casualizado com 8 repetições. +} +\examples{ + +library(lattice) + +data(ZimmermannTb3.5) +str(ZimmermannTb3.5) + +# Quantidade[época]. +adub <- expression(80[0], + 40[0] + 40[40], + 13.2[0] + 66.8[40], + 13.2[0] + 33.4[40] + 33.4[60]) +xyplot(prod ~ adub, data = ZimmermannTb3.5, + type = c("p", "a"), jitter.x = TRUE, + xlab = "Formas de adubação", + ylab = expression("Produção de arroz"~(kg~ha^{-1})), + scales = list(x = list(labels = adub))) + +aggregate(prod ~ adub, data = ZimmermannTb3.5, + FUN = function(x) { c(mean = mean(x), sd = sd(x)) }) + +} +\keyword{DIC} + diff --git a/man/ZimmermannTb7.4.Rd b/man/ZimmermannTb7.4.Rd new file mode 100644 index 00000000..5392e24b --- /dev/null +++ b/man/ZimmermannTb7.4.Rd @@ -0,0 +1,53 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb7.4.R +\name{ZimmermannTb7.4} +\alias{ZimmermannTb7.4} +\title{Produção de Grãos de Arroz em Ensaio Reticulado Retangular} +\format{Um \code{data.frame} com 90 observações e 3 variáveis, em que + +\describe{ + +\item{\code{rept}}{Fator categórico que representa as repetições do + experimento. Cada repetições tem 6 blocos de tamanho 3, + perfazendo 30 parcelas, uma para cada uma das + cultivares/linhagens estudadas.} + +\item{\code{bloco}}{Fator categórico que indentifica os blocos.} + +\item{\code{cult}}{Fator categórico que identifica as + cultivares/linhagens em competição.} + +\item{\code{prod}}{Produção de grãos de arroz irrigado (ka + ha\eqn{^{-1}}).} + +}} +\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. (Tabela 7.4, pág. 140) +} +\description{ +Dados de um estudo sobre competição de cultivares e + linhagens de arroz irrigado quanto a produtividade. O experimento + foi conduzido em ensaio em reticulado retangular 5 \eqn{\times} 6 + (blocos de tamanho 5, 6 blocos por repetição), com três + repetições. +} +\examples{ + +library(lattice) + +data(ZimmermannTb7.4) +str(ZimmermannTb7.4) + +xtabs(~bloc + rept, data = ZimmermannTb7.4) +xtabs(~cult + rept, data = ZimmermannTb7.4) + +xyplot(prod ~ reorder(cult, prod), + data = ZimmermannTb7.4, type = c("p", "a"), + xlab = "Cultiavres", + ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1}))) + +} +\keyword{reticulado} + diff --git a/man/ZimmermannTb8.5.Rd b/man/ZimmermannTb8.5.Rd new file mode 100644 index 00000000..6d766afd --- /dev/null +++ b/man/ZimmermannTb8.5.Rd @@ -0,0 +1,51 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb8.5.R +\name{ZimmermannTb8.5} +\alias{ZimmermannTb8.5} +\title{Produção de Grãos de Feijão em Delineamento de Blocos Aumentos + de Federer} +\format{Um \code{data.frame} com 90 observações e 3 variáveis, em que + +\describe{ + +\item{\code{bloc}}{Fator categórico que identifica os blocos do + experimento. Cada bloco tem tamanho 9.} + +\item{\code{linh}}{Fator categórico que identifica as linhagens do + experimento. A linhagens identificas de 1 a 4 são as + testemunhas.} + +\item{\code{prod}}{Produção de grãos de feijão (ka ha\eqn{^{-1}}).} + +}} +\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. (Tabela 8.5, pág. 158) +} +\description{ +Dados de um estudo em desenho de blocos aumentados de + Federer, com total de dezoito blocos, cada um com quatro + testemunhas (1 a 4), e 12 linhagens, num total de 216 + linhagens. Os dados são de apenas 10 dos blocos, contendo 9 + parcelas em cada um, 4 delas sendo testemunhas e as 5 restantes + são linhagens. A resposta medida foi a produção de grãos de + feijão em kg ha\eqn{^{-1}}. +} +\examples{ + +library(lattice) + +data(ZimmermannTb8.5) +str(ZimmermannTb8.5) + +xtabs(~linh, data = ZimmermannTb8.5) +xtabs(~bloc, data = ZimmermannTb8.5) + +xyplot(prod ~ reorder(linh, prod), data = ZimmermannTb8.5, + xlab = "Linhagens (ordenadas)", + ylab = expression("Produção de grãos de feijão"~(kg~ha^{-1}))) + +} +\keyword{BAF} + diff --git a/man/ZimmermannTb9.13.Rd b/man/ZimmermannTb9.13.Rd new file mode 100644 index 00000000..214e49ff --- /dev/null +++ b/man/ZimmermannTb9.13.Rd @@ -0,0 +1,57 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb9.13.R +\name{ZimmermannTb9.13} +\alias{ZimmermannTb9.13} +\title{Matéria Seca de Feijão em Fatorial 3x3} +\format{Um \code{data.frame} com 27 observações e 4 variáveis, em que + +\describe{ + +\item{\code{micro}}{Fator de níveis métricos que são as doses de + microelementos (FTE-BR-12) aplicado ao solo (g vaso\eqn{^{-1}}).} + +\item{\code{dens}}{Fator de níveis métricos que é densidade do solo + na qual foram cultivadas as plantas (g dm\eqn{^{-1}}).} + +\item{\code{rept}}{Inteiro que identifica as repetições de cada cela + experimental.} + +\item{\code{imseca}}{Logaritimo decimal da matéria seca das plantas + de feijão.} + +}} +\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. (Tabela 9.13, pág 179) +} +\description{ +Dados de um estudo em ensaio fatorial 3 \eqn{times} 3, + considerando três níveis de densidade de solo e três doses + microelementos. Cada vaso continha três plantas de arroz e, + adicionalmente aos microelementos, foi feita adubação com 4 g por + vaso de formulado 5-30-15. Os dados são de matéria seca de + feijão, em escala logarítmica. O experimento foi instalado em + delineamento de blocos casualizados. +} +\examples{ + +library(lattice) + +data(ZimmermannTb9.13) +str(ZimmermannTb9.13) + +xtabs(~micro + dens, data = ZimmermannTb9.13) + +xyplot(lms ~ dens, data = ZimmermannTb9.13, + groups = micro, type = c("p", "a"), + auto.key = list( + title = expression("Microelementos"~(g~vaso^{-1})), + cex.title = 1.1, columns = 3), + xlab = expression("Densidade do solo"~(g~cm^{-3})), + ylab = "log da matéria seca") + +} +\keyword{FAT} +\keyword{fatorial} + diff --git a/man/ZimmermannTb9.17.Rd b/man/ZimmermannTb9.17.Rd new file mode 100644 index 00000000..b3ce8fa3 --- /dev/null +++ b/man/ZimmermannTb9.17.Rd @@ -0,0 +1,60 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb9.17.R +\name{ZimmermannTb9.17} +\alias{ZimmermannTb9.17} +\title{Época de Aplicação de NK na Produção de Grãos de Arroz} +\format{Um \code{data.frame} com 81 observações e 5 variáveis, em que + +\describe{ + +\item{\code{epoc}}{Fator categórico que representa a época de + aplicação dos nutrientes.} + +\item{\code{pota}}{Fator categórico que representa a dose de potássio + aplicada.} + +\item{\code{nitr}}{Fator categórico que representa a dose de + nitrogênio aplicada.} + +\item{\code{bloc}}{Fator categórico que representa os blocos do + experimento. Os blocos tinham tamanho \eqn{3^3 = 27}.} + +\item{\code{prod}}{Produção de grão de arroz em (kg ha\eqn{^{-1}}).} + +}} +\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. (Tabela 9.17, pág. 182) +} +\description{ +Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3, + referentes à produção de grãos de arroz, em kg ha\eqn{^{-1}}. O + delineamento é o de blocos completos ao acaso, com três + repetições. Foram testados os efeitos do nitrogênio, potássio e + épocas de aplicação destes elementos na produtividade da soca do + arroz irrigado. +} +\examples{ + +library(lattice) + +data(ZimmermannTb9.17) +str(ZimmermannTb9.17) + +ftable(xtabs(~nitr + pota + epoc, data = ZimmermannTb9.17)) + +xyplot(prod ~ nitr | epoc, data = ZimmermannTb9.17, + groups = pota, type = c("p", "a"), + as.table = TRUE, + auto.key = list(title = "Potássio", cex.title = 1.1, + columns = 3), + strip = strip.custom(strip.names = TRUE, + var.name = "Época", + sep = " : "), + xlab = "Nitrogênio", + ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1}))) + +} +\keyword{FAT3} + diff --git a/man/ZimmermannTb9.26.Rd b/man/ZimmermannTb9.26.Rd new file mode 100644 index 00000000..4e7cab5c --- /dev/null +++ b/man/ZimmermannTb9.26.Rd @@ -0,0 +1,56 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ZimmermannTb9.26.R +\name{ZimmermannTb9.26} +\alias{ZimmermannTb9.26} +\title{Época de Aplicação de NK na Altura de Plantas} +\format{Um \code{data.frame} com 27 observações e 4 variáveis, em que + +\describe{ + +\item{\code{epoc}}{Fator categórico que representa a época de + aplicação dos nutrientes.} + +\item{\code{pota}}{Fator categórico que representa a dose de potássio + aplicada.} + +\item{\code{nitr}}{Fator categórico que representa a dose de + nitrogênio aplicada.} + +\item{\code{alt}}{Altura das plantas (cm).} + +}} +\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. (Tabela 9.26, pág. 190) +} +\description{ +Dados de um estudo em fatorial \eqn{3^3}, sobre adubação + nitrogenada e potássica e suas épocas de aplicação. Os dados são + referentes a altura de plantas no cultivo da soca de arroz + irrigado. Dados referen-se apenas aos valores do primeiro + bloco. Veja \code{\link{ZimmermannTb9.17}}. +} +\examples{ + +library(lattice) +library(latticeExtra) + +data(ZimmermannTb9.26) +str(ZimmermannTb9.26) + +ftable(xtabs(~epoc + nitr + pota, data = ZimmermannTb9.26)) + +useOuterStrips(xyplot(alt ~ nitr + pota | epoc, outer = TRUE, + data = ZimmermannTb9.26, + type = c("p", "a"), + xlab = "Níveis de nitrogênio/potássio", + ylab = "Altura das plantas (cm)"), + strip = strip.custom( + strip.name = TRUE, var.name = "Época"), + strip.left = strip.custom( + factor.levels = c("Nitrogênio", "Potássio"))) + +} +\keyword{FAT3} + -- GitLab