Adiciona Tabela 6A.6

R/NetoTb6A.6.R

+#' @name NetoTb6A.6
+#' @title Aumentando o Oxigênio do Ar
+#' @description Trata-se de um planejamento fatorial 2^4, realizado em
+#'     duplicata e acrescido de outros 20 ensaios situados no interior
+#'     do hipercubo definido pelos níveis extremos.
+#'     atividade enzimática.
+#' @format Um \code{data.frame} com 20 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{ens}}{Número do ensaio correspondente.}
+#'
+#' \item{\code{x1}}{Pressão de adsorção.}
+#' 
+#' \item{\code{x2}}{Pressão de dessorção.}
+#' 
+#' \item{\code{x3}}{Vazão de alimentação.}
+#' 
+#' \item{\code{x4}}{Tempo de adsorção.}
+#' 
+#' \item{\code{o}}{Teor de oxigênio na mistura enriquecida.}
+#' 
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Tabela 6A.6, pág. 310)
+#' @examples
+#'
+#' data(NetoTb6A.6)
+#' str(NetoTb6A.6)
+#'
+#' library(car)
+#' 
+#' scatterplotMatrix(NetoTb6A.6, pch = 20, cex.labels = 1.25) 
+#'
+NULL

data-raw/NetoTb6A.5.txt

-ens	x1	x2	ppo
-1	-1	-1	3.5
-2	-1	-1	3.2
-3	1	-1	1.17
-4	1	-1	1.7
-5	-1	1	4.1
-6	-1	1	5.4
-7	1	1	1.9
-8	1	1	2.1
-9	0	0	4.8
-10	0	0	5
-11	0	0	4.7
-12	0	0	5.2
-13	-1.41	0	5.25
-14	-1.41	0	5.41
-15	0	1.41	6
-16	0	1.41	3.2
-17	1.41	0	2.3
-18	1.41	0	1.6
-19	0	-1.41	0.5
-20	0	-1.41	0.5
+ens	x1	x2	x3	x4	o
+1	-1	-1	-1	-1	
+2	-1	-1	-1	-1	
+3	1	-1	-1	-1	
+4	1	-1	-1	-1	
+5	-1	1	-1	-1	
+6	-1	1	-1	-1	
+7	1	1	-1	-1	
+8	1	1	-1	-1	
+9	-1	-1	1	-1	
+10	-1	-1	1	-1	
+11	1	-1	1	-1	
+12	1	-1	1	-1	
+13	-1	1	1	-1	
+14	-1	1	1	-1	
+15	1	1	1	-1	
+16	1	1	1	-1	
+17	-1	-1	-1	1	
+18	-1	-1	-1	1	
+19	1	-1	-1	1	
+20	1	-1	-1	1	
+21	-1	1	-1	1	
+22	-1	1	-1	1	
+23	1	1	-1	1	
+24	1	1	-1	1	
+25	-1	-1	1	1	
+26	-1	-1	1	1	
+27	1	-1	1	1	
+28	1	-1	1	1	
+29	-1	1	1	1	
+30	-1	1	1	1	
+31	1	1	1	1	
+32	1	1	1	1	
+33	-1	0	-1	1	
+34	-0.8	0.6	-0.7	-0.09	
+35	-0.8	0.87	0.9	-0.91	
+36	-0.4	-0.33	-0.4	-0.36	
+37	0	-0.07	0	0.55	
+38	0	-0.33	-0.2		
+39	0	0	-1		
+40	0	-1	1		
+41	0.2	-0.07	0		
+42	0.4	-0.47	-0.2		
+43	0.4	0.33	0.3		
+44	0.6	-0.73	0.6		
+45	0.6	0.6	0.6		
+46	0.8	-0.73	-0.8		
+47	0.8	-0.87	-0.9		
+48	0.8	0.8	0.8		
+49	1	-1	1		
+50	0	0	0		
+51	0	0	0		
+52	0	0	0		

data-raw/NetoTb6A.6.txt

+ens	x1	x2	x3	x4	o
+1	-1	-1	-1	-1	50.1
+2	-1	-1	-1	-1	48.1
+3	1	-1	-1	-1	50.7
+4	1	-1	-1	-1	49.5
+5	-1	1	-1	-1	39.4
+6	-1	1	-1	-1	39.6
+7	1	1	-1	-1	42.1
+8	1	1	-1	-1	41.7
+9	-1	-1	1	-1	34.5
+10	-1	-1	1	-1	33.8
+11	1	-1	1	-1	40.3
+12	1	-1	1	-1	39.9
+13	-1	1	1	-1	30.3
+14	-1	1	1	-1	30.2
+15	1	1	1	-1	35.6
+16	1	1	1	-1	35.2
+17	-1	-1	-1	1	37
+18	-1	-1	-1	1	37.3
+19	1	-1	-1	1	43.4
+20	1	-1	-1	1	42.1
+21	-1	1	-1	1	32
+22	-1	1	-1	1	32
+23	1	1	-1	1	37.6
+24	1	1	-1	1	36.9
+25	-1	-1	1	1	26.6
+26	-1	-1	1	1	26.3
+27	1	-1	1	1	30.4
+28	1	-1	1	1	30.1
+29	-1	1	1	1	24.6
+30	-1	1	1	1	24
+31	1	1	1	1	27.9
+32	1	1	1	1	27.6
+33	-1	0	-1	1	32.8
+34	-0.8	0.6	-0.7	-0.09	33.5
+35	-0.8	0.87	0.9	-0.91	24.7
+36	-0.4	-0.33	-0.4	-0.36	38
+37	0	-0.07	0	0.55	31.2
+38	0	-0.33	-0.2	-0.09	34.6
+39	0	0	-1	-1	44
+40	0	-1	1	1	27.1
+41	0.2	-0.07	0	0.09	33.3
+42	0.4	-0.47	-0.2	0.09	35.8
+43	0.4	0.33	0.3	0.27	30.7
+44	0.6	-0.73	0.6	-0.73	37.2
+45	0.6	0.6	0.6	0.55	29.5
+46	0.8	-0.73	-0.8	-0.82	45.3
+47	0.8	-0.87	-0.9	0.09	42.8
+48	0.8	0.8	0.8	0.82	28
+49	1	-1	1	0	32.4
+50	0	0	0	0	33.6
+51	0	0	0	0	33.6
+52	0	0	0	0	33.4

man/NetoTb6A.6.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb6A.6.R
+\name{NetoTb6A.6}
+\alias{NetoTb6A.6}
+\title{Aumentando o Oxigênio do Ar}
+\format{Um \code{data.frame} com 20 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{ens}}{Número do ensaio correspondente.}
+
+\item{\code{x1}}{Pressão de adsorção.}
+
+\item{\code{x2}}{Pressão de dessorção.}
+
+\item{\code{x3}}{Vazão de alimentação.}
+
+\item{\code{x4}}{Tempo de adsorção.}
+
+\item{\code{o}}{Teor de oxigênio na mistura enriquecida.}
+
+}}
+\source{
+Barros Neto, Benício de (2010), (Tabela 6A.6, pág. 310)
+}
+\description{
+Trata-se de um planejamento fatorial 2^4, realizado em
+    duplicata e acrescido de outros 20 ensaios situados no interior
+    do hipercubo definido pelos níveis extremos.
+    atividade enzimática.
+}
+\examples{
+
+data(NetoTb6A.6)
+str(NetoTb6A.6)
+
+library(car)
+
+scatterplotMatrix(NetoTb6A.6, pch = 20, cex.labels = 1.25) 
+
+}
+\keyword{DBC}
+