From 74ed2c9df4cc9ca18f3a4e561867d943cc2eaceb Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmeszeviani@gmail.com>
Date: Mon, 17 Aug 2015 20:40:02 -0300
Subject: [PATCH] check() after adding potatoyield dataset.

---
 R/legTools.R       | 37 +++++++++++++++++++++++++++++++++++++
 man/potatoyield.Rd | 37 +++++++++++++++++++++++++++++++++++++
 2 files changed, 74 insertions(+)
 create mode 100644 man/potatoyield.Rd

diff --git a/R/legTools.R b/R/legTools.R
index 94bcc11..d7c6fd2 100644
--- a/R/legTools.R
+++ b/R/legTools.R
@@ -44,3 +44,40 @@ NULL
 #'        xlab="Feeding type")
 #'
 NULL
+
+#' @name potatoyield
+#'
+#' @title Potato variety competition experiment
+#' 
+#' @description These data are from an experiment done by the engineer
+#' Oscar A. Garay at Balcare, Argentina. The experiment was done in a
+#' randomized complete block design with 4 blocks. Potato yield (t
+#' ha^{-1}) was recorded in each experimental unit.
+#'
+#' \itemize{
+#'     \item block a categorical unordered factor with 4 levels.
+#'     \item variety a categorical unordered factor with 8 levels.
+#'     \item yield potato yield (t ha^{-1}).
+#' }
+#'
+#' @docType data
+#' 
+#' @keywords datasets
+#' 
+#' @usage data(potatoyield)
+#' 
+#' @format a \code{data.frame} with 32 records and 3 variables.
+#'
+#' @source Frederico, P. (2009). Curso de Estat{\'i}stica Experimental
+#' (15th ed.). Piracicaba, S{\~a}o Paulo: FEALQ. (page 76)
+#'
+#' @examples
+#' require(lattice)
+#' data(potatoyield)
+#' 
+#' plot(yield~variety, data=potatoyield,
+#'      groups=block, type="o",
+#'      ylab=expression(Yield~(t~ha^{-1})),
+#'      xlab="Variety")
+#' 
+NULL
diff --git a/man/potatoyield.Rd b/man/potatoyield.Rd
new file mode 100644
index 0000000..59da5f0
--- /dev/null
+++ b/man/potatoyield.Rd
@@ -0,0 +1,37 @@
+% Generated by roxygen2 (4.1.1): do not edit by hand
+% Please edit documentation in R/legTools.R
+\docType{data}
+\name{potatoyield}
+\alias{potatoyield}
+\title{Potato variety competition experiment}
+\format{a \code{data.frame} with 32 records and 3 variables.}
+\source{
+Frederico, P. (2009). Curso de Estat{\'i}stica Experimental
+(15th ed.). Piracicaba, S{\~a}o Paulo: FEALQ. (page 76)
+}
+\usage{
+data(potatoyield)
+}
+\description{
+These data are from an experiment done by the engineer
+Oscar A. Garay at Balcare, Argentina. The experiment was done in a
+randomized complete block design with 4 blocks. Potato yield (t
+ha^{-1}) was recorded in each experimental unit.
+
+\itemize{
+    \item block a categorical unordered factor with 4 levels.
+    \item variety a categorical unordered factor with 8 levels.
+    \item yield potato yield (t ha^{-1}).
+}
+}
+\examples{
+require(lattice)
+data(potatoyield)
+
+plot(yield~variety, data=potatoyield,
+     groups=block, type="o",
+     ylab=expression(Yield~(t~ha^{-1})),
+     xlab="Variety")
+}
+\keyword{datasets}
+
-- 
GitLab