Adiciona Tabela 40 (AndradeEx4.8).

R/AndradeEx4.8.R

+#' @name AndradeEx4.8
+#' @title Número de Ninhadas com X Porcos Machos
+#' @description Foram examinadas 2.000 ninhadas de cinco porcos cada
+#'     uma, segundo o número de machos.
+#' @format Um \code{data.frame} com 6 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{x}}{Número de machos na ninhada de 5 porcos.}
+#'
+#' \item{\code{ninhadas}}{Número de ninhadas com x porcos machos.}
+#'
+#' }
+#' @keywords AAS
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 4, Exercício
+#'     8, pág. 237)
+#' @examples
+#'
+#' data(AndradeEx4.8)
+#' str(AndradeEx4.8)
+#'
+#' barplot(AndradeEx4.8$ninhadas,
+#'         col = "darkturquoise",
+#'         names.arg = AndradeEx4.8$x,
+#'         xlab = "Número de Machos na Ninhada",
+#'         ylab = "Número de Ninhadas")
+#'
+NULL
\ No newline at end of file

data-raw/AndradeEx4.8.txt

+x	ninhadas
+0	20
+1	360
+2	700
+3	680
+4	200
+5	40

man/AndradeEx4.8.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx4.8.R
+\name{AndradeEx4.8}
+\alias{AndradeEx4.8}
+\title{Número de Ninhadas com X Porcos Machos}
+\format{Um \code{data.frame} com 6 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{x}}{Número de machos na ninhada de 5 porcos.}
+
+\item{\code{ninhadas}}{Número de ninhadas com x porcos machos.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 4, Exercício
+    8, pág. 237)
+}
+\description{
+Foram examinadas 2.000 ninhadas de cinco porcos cada
+    uma, segundo o número de machos.
+}
+\examples{
+
+data(AndradeEx4.8)
+str(AndradeEx4.8)
+
+barplot(AndradeEx4.8$ninhadas,
+        col = "darkturquoise",
+        names.arg = AndradeEx4.8$x,
+        xlab = "Número de Machos na Ninhada",
+        ylab = "Número de Ninhadas")
+
+}
+\keyword{AAS}
+