Skip to content
Snippets Groups Projects
Commit 4d5e05bb authored by Walmes Marques Zeviani's avatar Walmes Marques Zeviani
Browse files

Faz correções nos arquivos do Anexo 3 de NETO et al. 2010.

parent 1c1c82f1
No related branches found
No related tags found
1 merge request!122Lineu181 - adiciona 8 tabelas do Neto
Pipeline #
......@@ -3,30 +3,31 @@
\name{NetoTb3A.5}
\alias{NetoTb3A.5}
\title{Melhorando Funções de Onda}
\format{Um \code{data.frame} com 16 observações e 6 variáveis, em que
\format{Um \code{data.frame} com 16 observações e 5 variáveis, em que
\describe{
\item{\code{ens}}{Ensaio correspondente.}
\item{\code{f1}}{Fator 1, conjunto de base (6-31G e 6-311G).}
\item{\code{f1}}{Fator 1, conjunto de base.}
\item{\code{f2}}{Fator 2, funções de polarização (ausente e
presente).}
\item{\code{f2}}{Fator 2, funções de polarização.}
\item{\code{f3}}{Fator 3, funções difusas (usente e presente).}
\item{\code{f3}}{Fator 3, funções difusas.}
\item{\code{f4}}{Fator 4, correlação eletrônica.}
\item{\code{f4}}{Fator 4, correlação eletrônica (Hartree-Fock e
MP2).}
\item{\code{freq}}{Frequência resultante.}
}}
\source{
Barros Neto, Benício de (2010), (Tabela 3A.5, pág.154)
NETO et al. (2010), Tabela 3A.5, pág. 154.
}
\description{
Pesquisadores estavam interessados em avaliar como
alguns parâmetros usados para especificar a função de onda iriam
afetar a frequência.
afetar a frequência. Foi realizado um planejamento \eqn{2^4} para
investigar a influência de 4 fatores.
}
\examples{
......@@ -35,9 +36,12 @@ library(lattice)
data(NetoTb3A.5)
str(NetoTb3A.5)
xyplot(freq ~ f1, groups = interaction(f2, f3, f4, sep = ":"),
data = NetoTb3A.5, type = c("p", "a") , auto.key = TRUE)
xyplot(freq ~ f1 | f2,
groups = interaction(f3, f4, sep = ":"),
data = NetoTb3A.5,
type = c("p", "a"),
auto.key = TRUE)
}
\keyword{DBC}
\keyword{FAT2K}
......@@ -2,33 +2,34 @@
% Please edit documentation in R/NetoTb3A.6.R
\name{NetoTb3A.6}
\alias{NetoTb3A.6}
\title{Desempenho de Eletrodos}
\title{Desempenho de Eletrodos de Ti/TiO\eqn{_2}}
\format{Um \code{data.frame} com 16 observações e 6 variáveis, em que
\describe{
\item{\code{ens}}{Ensaio correspondente.}
\item{\code{f1}}{Fator 1, solução precursora (1:4:16 e 1:2:8).}
\item{\code{f1}}{Fator 1, solução precursora.}
\item{\code{f2}}{Fator 2, número de camadas (2 ou 10).}
\item{\code{f2}}{Fator 2, número de camadas.}
\item{\code{f3}}{Fator 3, temperatura (450 e 525 \eqn{^\circ}C).}
\item{\code{f3}}{Fator 3, temperatura.}
\item{\code{f4}}{Fator 4, concentração de nitrobenzeno (2 e 8 mM).}
\item{\code{f4}}{Fator 4, concentração de nitrobenzeno.}
\item{\code{f5}}{Fator 5, velocidade de varredura (50 e 200 mV
min\eqn{^{-1}}).}
\item{\code{f5}}{Fator 5, velocidade de varredura.}
\item{\code{des}}{Desempenho.}
\item{\code{des}}{Desempenho de eletrodos de Ti/TiO\eqn{_2}, em mC
cm\eqn{^{-2}}.}
}}
\source{
Barros Neto, Benício de (2010), (Tabela 3A.6, pág.156)
NETO et al. (2010), Tabela 3A.6, pág. 156.
}
\description{
O planejamento em fatorial foi usado para investigar
como cinco fatores influenciam o desempenho de eletrodos na
eletroredução de nitrobenzeno.
O planejamento em fatorial \eqn{2^5} foi usado para
investigar como cinco fatores influenciam o desempenho de
eletrodos na eletroredução de nitrobenzeno. O desempenho foi
medido em termos das cargas catódicas (mC cm\eqn{^{-2}}).
}
\examples{
......@@ -37,9 +38,11 @@ library(lattice)
data(NetoTb3A.6)
str(NetoTb3A.6)
xyplot(des ~ f1 | f2 * f3, groups = interaction(f4, f5),
data = NetoTb3A.6, type = c("p", "a"))
xyplot(des ~ f1 | f2 + f3,
groups = interaction(f4, f5),
data = NetoTb3A.6,
type = c("p", "a"))
}
\keyword{DBC}
\keyword{FAT2K}
......@@ -2,38 +2,36 @@
% Please edit documentation in R/NetoTb3A.8.R
\name{NetoTb3A.8}
\alias{NetoTb3A.8}
\title{Controlando a Espuma}
\format{Um \code{data.frame} com 16 observações e 5 variáveis, em que
\title{Controlando a Espuma de Detergentes}
\format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
\describe{
\item{\code{ens}}{Ensaio correspondente.}
\item{\code{prod}}{Celas experimentais criadas pela combinação de EO
e PO.}
\item{\code{prod}}{Produto.}
\item{\code{EO}}{Óxido de eteno (4 e 6).}
\item{\code{EO}}{Óxido de eteno.}
\item{\code{PO}}{Óxido de propeno (4 e 6).}
\item{\code{PO}}{Óxido de propeno.}
\item{\code{pt}}{Ponto de turvação.}
\item{\code{pt}}{Ponto de turvação, em \eqn{^\circ}C.}
}}
\source{
Barros Neto, Benício de (2010), (Tabela 3A.8, pág.159)
NETO et al. (2010), Tabela 3A.8, pág. 159.
}
\description{
Verificação de como o ponto de turvação varia com as
unidades de óxido de eteno e óxido de propeno dos álcoois graxos
unidades de óxido de eteno (EO) e óxido de propeno (PO) dos
álcoois graxos. Um plano experimental \eqn{2^2 + 3} pontos
centrais foi utilizado.
}
\examples{
data(NetoTb3A.8)
str(NetoTb3A.8)
plot(pt ~ ens, type = "o", col = 6, data = NetoTb3A.8,
xlab = "Ensaio", ylab = "",
main = "Ponto de Turvação em Função do Ensaio")
NetoTb3A.8
}
\keyword{DBC}
\keyword{FAT2K}
......@@ -2,8 +2,8 @@
% Please edit documentation in R/NetoTb3A.9.R
\name{NetoTb3A.9}
\alias{NetoTb3A.9}
\title{Desenvolvimento de um Detergente}
\format{Um \code{data.frame} com 8 observações e 5 variáveis, em que
\title{Desenvolvimento de um Detergente para Branqueamento de Roupas}
\format{Um \code{data.frame} com 8 observações e 6 variáveis, em que
\describe{
......@@ -16,17 +16,21 @@
\item{\code{C}}{Aditivo C.}
\item{\code{resp}}{Resposta, densidade ótica que mede a intensidade
da luz refletida pela roupa lavada.}
\item{\code{media}}{Densidade ótica que mede a intensidade da luz
refletida pela roupa lavada (resposta média de 12 ensaios
repetidos).}
\item{\code{var}}{Variância das observações nos 12 ensaios
repetidos.}
}}
\source{
Barros Neto, Benício de (2010), (Tabela 3A.9, pág.162)
NETO et al. 2010, Tabela 3A.9, pág. 162.
}
\description{
Utilizou-se um planejamento fatorial para avaliar os
efeitos da adoção de três ingredientes sobre o poder de
branqueameto.
Utilizou-se um planejamento fatorial \eqn{2^3} para
avaliar os efeitos da adoção de três ingredientes sobre o poder
de branqueameto de detergentes para roupas.
}
\examples{
......@@ -35,18 +39,18 @@ str(NetoTb3A.9)
par(mfrow = c(1,3))
with(NetoTb3A.9, interaction.plot(A, B, resp,
main = "Interação entre A e B",
with(NetoTb3A.9, interaction.plot(A, B, media,
main = "A x B",
col = "green"))
with(NetoTb3A.9, interaction.plot(A, C, resp,
main = "Interação entre A e C",
with(NetoTb3A.9, interaction.plot(A, C, media,
main = "A x C",
col = "blue"))
with(NetoTb3A.9, interaction.plot(B, C, resp,
main = "Interação entre B e C",
with(NetoTb3A.9, interaction.plot(B, C, media,
main = "B x C",
col = "red"))
}
\keyword{DBC}
\keyword{FAT2K}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment