From dfe60077cceadabb034053615006f2d91f81538f Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmeszeviani@gmail.com> Date: Mon, 17 Aug 2015 20:39:30 -0300 Subject: [PATCH] Add dataset potatoyield (Pimentel, page 76). --- data-raw/potatoyield.R | 26 ++++++++++++++++++++++++++ data/potatoyield.RData | Bin 0 -> 464 bytes 2 files changed, 26 insertions(+) create mode 100644 data-raw/potatoyield.R create mode 100644 data/potatoyield.RData diff --git a/data-raw/potatoyield.R b/data-raw/potatoyield.R new file mode 100644 index 0000000..c1b1600 --- /dev/null +++ b/data-raw/potatoyield.R @@ -0,0 +1,26 @@ +##---------------------------------------------------------------------- +## Data generation. + +potatoyield <- read.table("http://www.leg.ufpr.br/~walmes/data/pimentel_batatinha.txt", + header=TRUE, sep="\t") +names(potatoyield) <- c("block", "variety", "yield") +str(potatoyield) + +potatoyield <- potatoyield[with(potatoyield, order(block, variety)),] + +save(potatoyield, file="../data/potatoyield.RData") + +##---------------------------------------------------------------------- +## Examples. + +require(lattice) + +xyplot(yield~variety, data=potatoyield, + groups=block, type="o", + ylab=expression(Yield~(t~ha^{-1})), + xlab="Variety") + +rm(list=ls()) +load("../data/potatoyield.RData") +ls() +str(potatoyield) diff --git a/data/potatoyield.RData b/data/potatoyield.RData new file mode 100644 index 0000000000000000000000000000000000000000..c650a954d79af8e08247412563bcb3aa15f310ef GIT binary patch literal 464 zcmb2|=3oE==B*(&{SG;Z%+)*bXkT}Ba!)kV#4N$>ON4xLzHka3dfjokB_Nua_3`o- z`9Gw8N!PJe-M+WlDQ4cBCkExSi}~l?p5~`jwQ5pQ&q<$&s%qK^tBn45_@sK?_?>S% z|M$IGUyJKKnvVsVq*4XSbaj5qev%LP*YL}F*OG6Ri*)CxMJOklb$N+NZE~HK6gmH3 z5x@7ES0B_S)&$(%^QxM6gOzQ4+&?7~u@I(54M+YzXTJGKTFZCAC6~a{Pd`a2yPrCE zUc##C<f3KLlF8oIe|g@#l1z@aUiMpWTg&OKMQdLc^Bg@NWxD-d(Tc-63t|gZSCu?6 zT0M2gS=omlJf=7;+E-hXqft@wEbkZNwZ%IRA4<);@zALB%jWY3s|<P9L?5g9r}&Bc z_QPK%F7IS|cKyR2#$)Ce?W=k#zD?}^_4-7(Lp^Kls%X`^p8Qysns$lv3;AB{@B4i( zIK=<g_eHzztt|f8yI^IoM#a;Lt5$cNW}9an+P_?8-^5s*lWpbGRn=x)vhefeS?+ao z<)ng5Z6CeZHvVQ%_@UHN&OL+8hf$5uxPkM4M1qJw4c|0|?grL3=KM2QmoOIF^SHd4 X_1h-f+(C=a^|`EUbK>@H76t|Y@)h3* literal 0 HcmV?d00001 -- GitLab