Adiciona Exercício 4.8

R/NetoEx4.8.R

+#' @name NetoEx4.8
+#' @title Otimização de Reação Orgânica
+#' @description Resultados de um experimento fatorial 2^4 cujo objetivo, 
+#'     era a otimização de uma reação orgânic.
+#' @format Um \code{data.frame} com 8 observações e 6 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{ensaio}}{Número do ensaio correspondente.}
+#'
+#' \item{\code{f1}}{Fator 1: Temperatura.}
+#' 
+#' \item{\code{f2}}{Fator 2: Base.}
+#' 
+#' \item{\code{f3}}{Fator 3: Solvente.}
+#' 
+#' \item{\code{f4}}{Fator 4: Catalisador.}
+#'
+#' \item{resp}{Rendimento da reação (%).}
+#'
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Exercício 4.8, pág.176)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(NetoEx4.8)
+#' str(NetoEx4.8)
+#'
+#' xyplot(rend ~ f1 | f2 + f3, groups = f4, data = NetoEx4.8,
+#'        type = c("p", "a"), auto.key = TRUE)
+#'
+NULL
\ No newline at end of file

data-raw/NetoEx4.8.txt

+ensaio	f1	f2	f3	f4	rend
+1	-1	-1	-1	-1	0
+2	+1	-1	-1	+1	70
+3	-1	+1	-1	+1	65
+4	+1	+1	-1	-1	0
+5	-1	-1	+1	+1	100
+6	+1	-1	+1	-1	85
+7	-1	+1	+1	-1	50
+8	+1	+1	+1	+1	95

man/NetoEx4.8.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoEx4.8.R
+\name{NetoEx4.8}
+\alias{NetoEx4.8}
+\title{Otimização de Reação Orgânica}
+\source{
+Barros Neto, Benício de (2010), (Exercício 4.8, pág.176)
+}
+\description{
+Resultados de um experimento fatorial 2^4 cujo objetivo, 
+    era a otimização de uma reação orgânic.
+}
+\examples{
+
+library(lattice)
+
+data(NetoEx4.8)
+str(NetoEx4.8)
+
+xyplot(rend ~ f1 | f2 + f3, groups = f4, data = NetoEx4.8,
+       type = c("p", "a"), auto.key = TRUE)
+
+}
+\keyword{DBC}
+