diff --git a/R/NetoEx3.11.R b/R/NetoEx3.11.R
new file mode 100644
index 0000000000000000000000000000000000000000..2255a22f56aaa034e1ff0c02fedd9fe6fa5b6c4d
--- /dev/null
+++ b/R/NetoEx3.11.R
@@ -0,0 +1,43 @@
+#' @name NetoEx3.11
+#' @title Síntese de Polipirrol
+#' @description Como exercício num curso de quimioterapia, foram
+#'     analisados dados obtidos por um pesquisador numa série de
+#'     experimentos de síntese de polipirrol numa matriz de EPDM. O
+#'     plano fatorial é um \eqn{2^3} com duas repetições.
+#' @format Um \code{data.frame} com 16 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{t}}{Tempo da reação.}
+#'
+#' \item{\code{C}}{Concentração de oxidante.}
+#'
+#' \item{\code{P}}{Tamanho da partícula.}
+#'
+#' \item{\code{rend}}{Rendimento da reação (\%).}
+#'
+#' }
+#' @keywords FAT2K
+#' @source NETO et al. (2010), Exercício 3.11, pág. 126.
+#' @examples
+#'
+#' data(NetoEx3.11)
+#' str(NetoEx3.11)
+#'
+#' par(mfrow = c(1,3))
+#' with(NetoEx3.11, {
+#'     interaction.plot(t, C, rend,
+#'                      ylab = "Rendimento Médio",
+#'                      main = "Tempo de Reação x Conc. de Oxidante",
+#'                      col = "blue")
+#'     interaction.plot(t, P, rend,
+#'                      ylab = "Rendimento Médio",
+#'                      main = "Tempo de Reação x Tamanho da Partícula",
+#'                      col = "green")
+#'     interaction.plot(C, P, rend,
+#'                      ylab = "Rendimento Médio",
+#'                      main = "Conc. de Oxidente x Tamanho da Partícula",
+#'                      col = "red")
+#' })
+#'
+NULL
diff --git a/R/NetoTb2.2.R b/R/NetoTb2.2.R
new file mode 100644
index 0000000000000000000000000000000000000000..715d67e233051f4bdecb0cf3cdcd0b4bb50e81c7
--- /dev/null
+++ b/R/NetoTb2.2.R
@@ -0,0 +1,21 @@
+#' @name NetoTb2.2
+#' @title Pesos de Caroços Extraídos de um Pacote de Feijão
+#' @description Pesos individuais de 140 caroços retirados
+#'     aleatoriamente de um pacote contendo 1 kg de feijão preto.
+#' @format Um \code{vetor} numérico com 140 observações.
+#' @keywords AAS
+#' @source NETO et al. (2010), Tabela 2.2, pág. 32.
+#' @examples
+#'
+#' data(NetoTb2.2)
+#' str(NetoTb2.2)
+#'
+#' hist(NetoTb2.2,
+#'      xlab = "Peso",
+#'      ylab = "Frequência",
+#'      main = "Pesos dos Caroços",
+#'      col = "grey",
+#'      prob = TRUE)
+#' lines(density(NetoTb2.2), lwd = 2)
+#'
+NULL
diff --git a/R/NetoTb2.4.R b/R/NetoTb2.4.R
new file mode 100644
index 0000000000000000000000000000000000000000..03d81d422f7bc75b3d968b3234f771fc370c0934
--- /dev/null
+++ b/R/NetoTb2.4.R
@@ -0,0 +1,47 @@
+#' @name NetoTb2.4
+#' @title Comparação de Titulação de Viangre por 2 Químicos
+#' @description Dois químicos, Arrhenius e Berzelius, foram encarregados
+#'     de analisar lotes de vinagre de 5 diferentes fabricantes. O
+#'     experimento contém um único fator com dois níveis (os químicos) e
+#'     uma resposta (o teor de acído acético, em \%). As medidas são
+#'     pareadas, ou seja, os dois quimícos avaliam cada um dos vinagres
+#'     gerando, para cada vinagre, um par de valores da resposta.
+#' @format Um \code{data.frame} com 5 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{Arr}}{Teores de ácido acético determinados pelo Químico
+#'     Arrhenius.}
+#'
+#' \item{\code{Ber}}{Teores de ácido acético determinados pelo Químico
+#'     Berzelius.}
+#'
+#' \item{\code{d}}{Diferença de concentação obtida entre os químicos
+#'     para a amostra de vinagre do mesmo fabricante.}
+#'
+#' }
+#' @keywords pareada
+#' @source NETO et al. (2010), Tabela 2.4, pág. 79.
+#' @examples
+#'
+#' library(lattice)
+#' library(latticeExtra)
+#'
+#' data(NetoTb2.4)
+#' str(NetoTb2.4)
+#'
+#' dotplot(1:length(d) ~ Arr + Ber,
+#'         data = NetoTb2.4,
+#'         auto.key = TRUE,
+#'         xlab = "Teor de ácido acético (%)",
+#'         ylab = "Fabricantes")
+#'
+#' xyplot(Arr ~ Ber,
+#'        data = NetoTb2.4,
+#'        aspect = "iso",
+#'        grid = TRUE,
+#'        xlab = "Berzelius",
+#'        ylab = "Arrhenius") +
+#'     layer(panel.abline(a = 0, b = 1, lty = 2))
+#'
+NULL
diff --git a/R/NetoTb2A.1.R b/R/NetoTb2A.1.R
new file mode 100644
index 0000000000000000000000000000000000000000..c3317919c5ba52afc8dccc8af585ca0e9d1a3199
--- /dev/null
+++ b/R/NetoTb2A.1.R
@@ -0,0 +1,49 @@
+#' @name NetoTb2A.1
+#' @title Tempo de Casa ao Trabalho em 3 Percursos
+#' @description Foi cronometrado o tempo transcorrido desde o momento em
+#'    que o ônibus passa por uma ponte no trajeto até a hora que o
+#'    pesquisador chega à seu destino final. Os dados possem registros
+#'     do dia da semana e do percurso que foi feito.
+#' @format Um \code{data.frame} com 32 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{sai}}{Variável que indica o horário de saída do
+#'     pesquisador rumo ao destino final.}
+#'
+#' \item{dia}{Fator de 5 níveis referentes aos dias da semana em que o
+#'    pesquisador realizou o trajeto.}
+#'
+#' \item{perc}{Fator de 3 níveis referentes ao percurso (trajeto)
+#'     realizado.}
+#'
+#' \item{tem}{Tempo até chegar os destino final, em minutos.}
+#'
+#' }
+#' @keywords RM
+#' @source NETO et al. (2010), Tabela 2A.1, pág. 86.
+#' @examples
+#'
+#' data(NetoTb2A.1)
+#' str(NetoTb2A.1)
+#'
+#' library(lattice)
+#'
+#' NetoTb2A.1$hora <- as.POSIXct(NetoTb2A.1$sai, format = "%H:%M")
+#' NetoTb2A.1$hora <- as.numeric(difftime(NetoTb2A.1$hora,
+#'                                        min(NetoTb2A.1$hora),
+#'                                        units = "mins"))
+#'
+#' addmargins(xtabs(~dia + perc, data = NetoTb2A.1))
+#'
+#' xyplot(tem ~ hora | perc,
+#'        type = "p",
+#'        groups = dia,
+#'        auto.key = TRUE,
+#'        par.settings = list(superpose.symbol = list(pch = 19)),
+#'        data = NetoTb2A.1,
+#'        xlab = "Ensaio",
+#'        ylab = "Tempo",
+#'        main = "Tempo de Viagem")
+#'
+NULL
diff --git a/R/NetoTb2A.3.R b/R/NetoTb2A.3.R
new file mode 100644
index 0000000000000000000000000000000000000000..c01352a22999ff42b9644590ee95e6715fbe9f72
--- /dev/null
+++ b/R/NetoTb2A.3.R
@@ -0,0 +1,39 @@
+#' @name NetoTb2A.3
+#' @title Bioequivalencia de Medicamentos Genéricos e de Marca
+#' @description Foram ministrados dois medicamentos distintos, um
+#'     genérico e um de marca, em 21 voluntários e observou-se a área
+#'     abaixo da curva de concentração do princípio ativo no sangue, em
+#'     função do tempo, dos indivíduos no período de 8 horas.
+#' @format Um \code{data.frame} com 21 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{vol}}{Número do voluntário que foi submetido aos dois
+#'     medicamentos.}
+#'
+#' \item{\code{A}}{Valor da área abaixo da curva da concentração do
+#'     princípio ativo no sangue no período de 8 horas do medicamento
+#'     genérico.}
+#'
+#' \item{\code{B}}{Valor da área abaixo da curva da concentração do
+#'     princípio ativo no sangue no período de 8 horas do medicamento de
+#'     referência.}
+#'
+#' }
+#' @keywords pareado
+#' @source NETO et al. (2010), Tabela 2A.3, pág. 93.
+#' @examples
+#'
+#' data(NetoTb2A.3)
+#' str(NetoTb2A.3)
+#'
+#' library(lattice)
+#'
+#' dotplot(reorder(vol, B) ~ A + B,
+#'         data = NetoTb2A.3,
+#'         auto.key = TRUE,
+#'         xlab = "Área abaixo da curva",
+#'         ylab = "Voluntários\n(ordenados pelo medicamento de referência)",
+#'         par.settings = list(superpose.symbol = list(pch = 19)))
+#'
+NULL
diff --git a/R/NetoTb2A.5.R b/R/NetoTb2A.5.R
new file mode 100644
index 0000000000000000000000000000000000000000..8671481ea432dd63e74b089ca4e99525870a8643
--- /dev/null
+++ b/R/NetoTb2A.5.R
@@ -0,0 +1,32 @@
+#' @name NetoTb2A.5
+#' @title Produtividade de Algas Marinhas
+#' @description Teor de agar-agar de algas retiradas de 2 locais com
+#'     diferentes níveis de atividade industrial.
+#' @format Um \code{data.frame} com 10 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{local}}{Local de onde foram extraídas as amostras de
+#'     alga: A - local com pouca atividade urbana mas com atividade
+#'     industrial, B - local com muita atividade urbana mas sem
+#'     atividade industrial.}
+#'
+#' \item{\code{teor}}{Teor de agar-agar observado (\%) da alga.}
+#'
+#' }
+#' @keywords AAS
+#' @source NETO et al. (2010), Tabela 2A.5, pág. 97.
+#' @examples
+#'
+#' data(NetoTb2A.5)
+#' str(NetoTb2A.5)
+#'
+#' library(lattice)
+#'
+#' bwplot(teor ~ local, data = NetoTb2A.5,
+#'        par.settings = list(box.dot = list(pch = "|"),
+#'                            box.umbrella = list(lty = 1, col = 1),
+#'                            box.rectangle = list(col = 1,
+#'                                                 fill = "gray50")))
+#'
+NULL
diff --git a/R/NetoTb3.3.R b/R/NetoTb3.3.R
new file mode 100644
index 0000000000000000000000000000000000000000..f52c66e8e6f2a5d8208c3cea9f8994216de90716
--- /dev/null
+++ b/R/NetoTb3.3.R
@@ -0,0 +1,46 @@
+#' @name NetoTb3.3
+#' @title Rendimento de uma Reação em Função da Temperatura, Catalizador
+#'     e Concentração
+#' @description Resultado de um planejamento fatorial \eqn{2^3}, em
+#'     duplicata, que estudou o rendimento de uma reação em função dos
+#'     níveis de temperatura, tipo de catalizador e níveis de
+#'     concentação.
+#' @format Um \code{data.frame} com 16 observações e 5 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{f1}}{Temperatura (40 e 60\eqn{^\circ}C).}
+#'
+#' \item{\code{f2}}{Tipo de catalisador (A e B).}
+#'
+#' \item{\code{f3}}{Concentração (1 e 1.5 M).}
+#'
+#' \item{\code{rend}}{Rendimento da reação (\%).}
+#'
+#' \item{\code{ord}}{Ordem da realização das corridas.}
+#'
+#' }
+#' @keywords FAT2K
+#' @source NETO et al. (2010), Tabela 3.3, pág. 121.
+#' @examples
+#'
+#' data(NetoTb3.3)
+#' str(NetoTb3.3)
+#'
+#' par(mfrow = c(1, 3))
+#' with(NetoTb3.3, {
+#'     interaction.plot(f1, f2, rend,
+#'                      ylab = "Rendimento Médio",
+#'                      main = "Temperatura x Catalizador",
+#'                      col = "blue")
+#'     interaction.plot(f1, f3, rend,
+#'                      ylab = "Rendimento Médio",
+#'                      main = "Temperatura x Concentração",
+#'                      col = "green")
+#'     interaction.plot(f2, f3, rend,
+#'                      ylab = "Rendimento Médio",
+#'                      main = "Catalizador x Concentração",
+#'                      col = "red")
+#' })
+#'
+NULL
diff --git a/R/NetoTb3.6.R b/R/NetoTb3.6.R
new file mode 100644
index 0000000000000000000000000000000000000000..4f5b35c68577944644d51537563b34a76adafd33
--- /dev/null
+++ b/R/NetoTb3.6.R
@@ -0,0 +1,36 @@
+#' @name NetoTb3.6
+#' @title Influência de Quatro Fatores no Rendimento de uma Reação
+#' @description Resultados de um experimento fatorial \eqn{2^4} que
+#'     estudou o efeito de quatro fatores no rendimento de uma reação
+#'     química.
+#' @format Um \code{data.frame} com 16 observações e 5 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{f1}}{Temperatura (40 e 60\eqn{^\circ}C).}
+#'
+#' \item{\code{f2}}{Tipo de catalisador (A e B).}
+#'
+#' \item{\code{f3}}{Concentração (1 e 1.5 M).}
+#'
+#' \item{\code{f4}}{Acidez (pH 7 e 6).}
+#'
+#' \item{rend}{Rendimento de uma reação.}
+#'
+#' }
+#' @keywords FAT2K
+#' @source NETO et al. (2010), Tabela 3.6, pág. 130.
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(NetoTb3.6)
+#' str(NetoTb3.6)
+#'
+#' xyplot(res ~ f1 | f2,
+#'        groups = interaction(f3, f4, sep = ":"),
+#'        data = NetoTb3.6,
+#'        type = c("p", "a"),
+#'        auto.key = TRUE)
+#'
+NULL
diff --git a/data-raw/NetoEx3.11.txt b/data-raw/NetoEx3.11.txt
new file mode 100644
index 0000000000000000000000000000000000000000..4ef242efd2cc926a39a9c54ebdf77ccdd5cf2604
--- /dev/null
+++ b/data-raw/NetoEx3.11.txt
@@ -0,0 +1,17 @@
+i	t	C	P	rend
+1	-1	-1	-1	4.39
+2	1	-1	-1	6.21
+3	-1	1	-1	14.51
+4	1	1	-1	19.57
+5	-1	-1	1	2.09
+6	1	-1	1	3.15
+7	-1	1	1	11.77
+8	1	1	1	19.4
+9	-1	-1	-1	4.73
+10	1	-1	-1	5.75
+11	-1	1	-1	13.45
+12	1	1	-1	21.11
+13	-1	-1	1	1.93
+14	1	-1	1	3.39
+15	-1	1	1	12.69
+16	1	1	1	17.98
diff --git a/data-raw/NetoTb2.2.txt b/data-raw/NetoTb2.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..d8f70a5a0097cdef64ff84d272ae3d0bc52192f4
--- /dev/null
+++ b/data-raw/NetoTb2.2.txt
@@ -0,0 +1,140 @@
+0.1188
+0.1795
+0.2382
+0.2505
+0.1810
+0.2833
+0.2309
+0.1746
+0.2327
+0.2311
+0.2459
+0.1996
+0.2096
+0.1814
+0.2595
+0.1848
+0.1965
+0.2593
+0.2647
+0.1399
+0.2673
+0.1910
+0.2091
+0.1823
+0.2126
+0.2380
+0.2458
+0.1677
+0.2137
+0.1902
+0.2098
+0.1995
+0.2054
+0.1340
+0.1470
+0.2184
+0.1773
+0.1799
+0.2666
+0.2790
+0.1795
+0.1409
+0.2660
+0.1590
+0.1596
+0.1930
+0.1496
+0.2456
+0.1793
+0.1970
+0.1817
+0.1732
+0.1561
+0.2051
+0.2674
+0.2254
+0.1340
+0.2585
+0.2535
+0.1988
+0.2369
+0.1733
+0.2126
+0.1722
+0.2504
+0.1980
+0.1865
+0.1828
+0.2423
+0.1644
+0.1736
+0.1987
+0.1766
+0.2455
+0.1701
+0.1573
+0.2237
+0.2153
+0.1874
+0.1904
+0.1826
+0.2146
+0.2048
+0.1462
+0.2285
+0.1402
+0.2087
+0.1663
+0.2012
+0.1935
+0.2296
+0.2482
+0.2620
+0.2008
+0.2055
+0.1696
+0.1996
+0.2365
+0.1869
+0.1911
+0.1860
+0.1965
+0.2058
+0.1985
+0.3043
+0.2060
+0.2335
+0.1971
+0.1968
+0.1421
+0.2200
+0.1708
+0.1642
+0.1740
+0.2215
+0.2262
+0.1463
+0.1629
+0.2266
+0.2186
+0.2045
+0.2326
+0.1666
+0.1769
+0.1683
+0.2097
+0.2173
+0.2341
+0.2433
+0.1202
+0.2025
+0.2465
+0.2507
+0.2089
+0.2080
+0.1950
+0.1917
+0.1875
+0.2143
+0.1606
\ No newline at end of file
diff --git a/data-raw/NetoTb2.4.txt b/data-raw/NetoTb2.4.txt
new file mode 100644
index 0000000000000000000000000000000000000000..2baf3c2a78381bf6103753cadb5b414b4ebf90c5
--- /dev/null
+++ b/data-raw/NetoTb2.4.txt
@@ -0,0 +1,6 @@
+Amo	Arrh	Ber	d
+1	3.77	3.62	0.15
+2	3.85	3.69	0.16
+3	4.07	4.10	-0.03
+4	4.83	4.70	0.13
+5	5.05	4.89	0.16
diff --git a/data-raw/NetoTb2A.1.txt b/data-raw/NetoTb2A.1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..b14a3805f6bd40ee0d07f368562b50f5c3b40254
--- /dev/null
+++ b/data-raw/NetoTb2A.1.txt
@@ -0,0 +1,33 @@
+ens	sai	dia	perc	tem
+1	10:55	seg 	C	18.3
+2	11:20	qua	C	18.9
+3	10:40	sex	B	10.9
+4	11:25	seg 	C	20.7
+5	12:50	sex	B	11.4
+6	11:30	qua	C	22.9
+7	11:25	qua	B	12.1
+8	07:35	ter	A	12.8
+9	08:10	seg 	C	56.3
+10	07:00	ter	A	13.3
+11	08:10	qui	B	10.9
+12	17:00	sex	A	13.1
+13	15:00	qua	A	12.7
+14	12:30	seg 	C	20.6
+15	07:30	ter	C	18.9
+16	12:30	qua	B	11
+17	08:15	sex	B	10.3
+18	07:05	qui	A	13
+19	12:50	seg 	C	18.6
+20	07:35	ter	A	13
+21	08:00	qui	B	10.6
+22	09:20	qua	B	10.4
+23	07:15	qui	C	21.5
+24	08:15	sexta	B	10.9
+25	08:40	segunda 	B	10.9
+26	08:40	quarta	B	11
+27	09:00	sexta	C	19.1
+28	10:00	quarta	C	16.1
+29	09:10	sexta	B	12.1
+30	09:15	quarta	C	18.1
+31	11:15	segunda 	B	12.2
+32	14:30	sexta	C	19.2
diff --git a/data-raw/NetoTb2A.3.txt b/data-raw/NetoTb2A.3.txt
new file mode 100644
index 0000000000000000000000000000000000000000..630d4e726092e7042947baf6183feda8ed36c6ed
--- /dev/null
+++ b/data-raw/NetoTb2A.3.txt
@@ -0,0 +1,22 @@
+vol	A	B
+1	12.761	10.983
+2	10.241	8.211
+3	8.569	9.105
+4	13.321	12.508
+5	11.481	12.114
+6	14.061	11.520
+7	12.287	11.983
+8	14.696	14.454
+9	12.526	11.246
+10	9.060	10.740
+11	12.329	10.879
+12	13.244	13.818
+13	7.864	7.156
+14	9.684	12.297
+15	11.811	12.279
+16	10.109	9.571
+17	10.966	9.895
+18	10.485	15.579
+19	11.899	9.296
+20	13.200	16.163
+21	12.368	11.838
diff --git a/data-raw/NetoTb2A.5.txt b/data-raw/NetoTb2A.5.txt
new file mode 100644
index 0000000000000000000000000000000000000000..067b3a4f819fcc52c51fbb84a46250348c02a733
--- /dev/null
+++ b/data-raw/NetoTb2A.5.txt
@@ -0,0 +1,11 @@
+A	B
+39.75	42.37
+36.4	45.23
+33.88	34.14
+27.85	37
+31.42	29.96
+34.4	31.82
+36.62	34.58
+36.5	42.58
+38.04	42.38
+23.8	NA
diff --git a/data-raw/NetoTb3.3.txt b/data-raw/NetoTb3.3.txt
new file mode 100644
index 0000000000000000000000000000000000000000..e115b35edf290b8e39cd33460c71e323ac6c3774
--- /dev/null
+++ b/data-raw/NetoTb3.3.txt
@@ -0,0 +1,17 @@
+ens	f1	f2	f3	rend	ord
+1	-1	-1	-1	56	(7)
+2	1	-1	-1	85	(9)
+3	-1	1	-1	49	(11)
+4	1	1	-1	64	(2)
+5	-1	-1	1	65	(13)
+6	1	-1	1	92	(6)
+7	-1	1	1	57	(14)
+8	1	1	1	70	(8)
+9	-1	-1	-1	52	(12)
+10	1	-1	-1	88	(10)
+11	-1	1	-1	47	(15)
+12	1	1	-1	62	(1)
+13	-1	-1	1	61	(5)
+14	1	-1	1	95	(16)
+15	-1	1	1	60	(3)
+16	1	1	1	74	(4)
diff --git a/data-raw/NetoTb3.6.txt b/data-raw/NetoTb3.6.txt
new file mode 100644
index 0000000000000000000000000000000000000000..b750f0fafe1788de5c69a9bbd1f0137126e46115
--- /dev/null
+++ b/data-raw/NetoTb3.6.txt
@@ -0,0 +1,17 @@
+ens	f1	f2	f3	f4	res
+1	-1	-1	-1	-1	54
+2	+1	-1	-1	-1	85
+3	-1	+1	-1	-1	49
+4	+1	+1	-1	-1	62
+5	-1	-1	+1	-1	64
+6	+1	-1	+1	-1	94
+7	-1	+1	+1	-1	56
+8	+1	+1	+1	-1	70
+9	-1	-1	-1	+1	52
+10	+1	-1	-1	+1	87
+11	-1	+1	-1	+1	49
+12	+1	+1	-1	+1	64
+13	-1	-1	+1	+1	64
+14	+1	-1	+1	+1	94
+15	-1	+1	+1	+1	58
+16	+1	+1	+1	+1	73
diff --git a/data/NetoEx3.11.rda b/data/NetoEx3.11.rda
new file mode 100644
index 0000000000000000000000000000000000000000..02d7bb3b96275bf5b57749d2ecbaf383dafe0e8d
Binary files /dev/null and b/data/NetoEx3.11.rda differ
diff --git a/data/NetoTb2.2.rda b/data/NetoTb2.2.rda
new file mode 100644
index 0000000000000000000000000000000000000000..27a8a180a5b2b762b3974bbbfe2f1a4fb009400c
Binary files /dev/null and b/data/NetoTb2.2.rda differ
diff --git a/data/NetoTb2.4.rda b/data/NetoTb2.4.rda
new file mode 100644
index 0000000000000000000000000000000000000000..1cd85f94faf26d1f1bc0b0aa2445a42fa4df338f
Binary files /dev/null and b/data/NetoTb2.4.rda differ
diff --git a/data/NetoTb2A.1.rda b/data/NetoTb2A.1.rda
new file mode 100644
index 0000000000000000000000000000000000000000..2f246448f0a7ab27001fec5008088e8d3ce88c4e
Binary files /dev/null and b/data/NetoTb2A.1.rda differ
diff --git a/data/NetoTb2A.3.rda b/data/NetoTb2A.3.rda
new file mode 100644
index 0000000000000000000000000000000000000000..b1020d9124f61b4a0fb2240802552435ec8247d0
Binary files /dev/null and b/data/NetoTb2A.3.rda differ
diff --git a/data/NetoTb2A.5.rda b/data/NetoTb2A.5.rda
new file mode 100644
index 0000000000000000000000000000000000000000..62f8bfd17b0849ecb77d356f1f69f1097fc1c766
Binary files /dev/null and b/data/NetoTb2A.5.rda differ
diff --git a/data/NetoTb3.3.rda b/data/NetoTb3.3.rda
new file mode 100644
index 0000000000000000000000000000000000000000..a3dfece9b5268a807959ab0e69fd7dab12e008fa
Binary files /dev/null and b/data/NetoTb3.3.rda differ
diff --git a/data/NetoTb3.6.rda b/data/NetoTb3.6.rda
new file mode 100644
index 0000000000000000000000000000000000000000..96c867fd76fa901bd079a61f3793c219b3f0cdc7
Binary files /dev/null and b/data/NetoTb3.6.rda differ
diff --git a/man/NetoEx3.11.Rd b/man/NetoEx3.11.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..d821990033999ec78640d679ae09900a37d58d60
--- /dev/null
+++ b/man/NetoEx3.11.Rd
@@ -0,0 +1,51 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoEx3.11.R
+\name{NetoEx3.11}
+\alias{NetoEx3.11}
+\title{Síntese de Polipirrol}
+\format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{t}}{Tempo da reação.}
+
+\item{\code{C}}{Concentração de oxidante.}
+
+\item{\code{P}}{Tamanho da partícula.}
+
+\item{\code{rend}}{Rendimento da reação (\%).}
+
+}}
+\source{
+NETO et al. (2010), Exercício 3.11, pág. 126.
+}
+\description{
+Como exercício num curso de quimioterapia, foram
+    analisados dados obtidos por um pesquisador numa série de
+    experimentos de síntese de polipirrol numa matriz de EPDM. O
+    plano fatorial é um \eqn{2^3} com duas repetições.
+}
+\examples{
+
+data(NetoEx3.11)
+str(NetoEx3.11)
+
+par(mfrow = c(1,3))
+with(NetoEx3.11, {
+    interaction.plot(t, C, rend,
+                     ylab = "Rendimento Médio",
+                     main = "Tempo de Reação x Conc. de Oxidante",
+                     col = "blue")
+    interaction.plot(t, P, rend,
+                     ylab = "Rendimento Médio",
+                     main = "Tempo de Reação x Tamanho da Partícula",
+                     col = "green")
+    interaction.plot(C, P, rend,
+                     ylab = "Rendimento Médio",
+                     main = "Conc. de Oxidente x Tamanho da Partícula",
+                     col = "red")
+})
+
+}
+\keyword{FAT2K}
+
diff --git a/man/NetoTb2.2.Rd b/man/NetoTb2.2.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..cd5e94d33569a9f69ba749f139c490c4ca824e5b
--- /dev/null
+++ b/man/NetoTb2.2.Rd
@@ -0,0 +1,29 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2.2.R
+\name{NetoTb2.2}
+\alias{NetoTb2.2}
+\title{Pesos de Caroços Extraídos de um Pacote de Feijão}
+\format{Um \code{vetor} numérico com 140 observações.}
+\source{
+NETO et al. (2010), Tabela 2.2, pág. 32.
+}
+\description{
+Pesos individuais de 140 caroços retirados
+    aleatoriamente de um pacote contendo 1 kg de feijão preto.
+}
+\examples{
+
+data(NetoTb2.2)
+str(NetoTb2.2)
+
+hist(NetoTb2.2,
+     xlab = "Peso",
+     ylab = "Frequência",
+     main = "Pesos dos Caroços",
+     col = "grey",
+     prob = TRUE)
+lines(density(NetoTb2.2), lwd = 2)
+
+}
+\keyword{AAS}
+
diff --git a/man/NetoTb2.4.Rd b/man/NetoTb2.4.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..7ca55037a0b24ddd4ff42b6812a5aeaf37965e72
--- /dev/null
+++ b/man/NetoTb2.4.Rd
@@ -0,0 +1,55 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2.4.R
+\name{NetoTb2.4}
+\alias{NetoTb2.4}
+\title{Comparação de Titulação de Viangre por 2 Químicos}
+\format{Um \code{data.frame} com 5 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{Arr}}{Teores de ácido acético determinados pelo Químico
+    Arrhenius.}
+
+\item{\code{Ber}}{Teores de ácido acético determinados pelo Químico
+    Berzelius.}
+
+\item{\code{d}}{Diferença de concentação obtida entre os químicos
+    para a amostra de vinagre do mesmo fabricante.}
+
+}}
+\source{
+NETO et al. (2010), Tabela 2.4, pág. 79.
+}
+\description{
+Dois químicos, Arrhenius e Berzelius, foram encarregados
+    de analisar lotes de vinagre de 5 diferentes fabricantes. O
+    experimento contém um único fator com dois níveis (os químicos) e
+    uma resposta (o teor de acído acético, em \%). As medidas são
+    pareadas, ou seja, os dois quimícos avaliam cada um dos vinagres
+    gerando, para cada vinagre, um par de valores da resposta.
+}
+\examples{
+
+library(lattice)
+library(latticeExtra)
+
+data(NetoTb2.4)
+str(NetoTb2.4)
+
+dotplot(1:length(d) ~ Arr + Ber,
+        data = NetoTb2.4,
+        auto.key = TRUE,
+        xlab = "Teor de ácido acético (\%)",
+        ylab = "Fabricantes")
+
+xyplot(Arr ~ Ber,
+       data = NetoTb2.4,
+       aspect = "iso",
+       grid = TRUE,
+       xlab = "Berzelius",
+       ylab = "Arrhenius") +
+    layer(panel.abline(a = 0, b = 1, lty = 2))
+
+}
+\keyword{pareada}
+
diff --git a/man/NetoTb2A.1.Rd b/man/NetoTb2A.1.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..99848a5f292d9f2dad5d2ce8dfd41e6ce5aac2cb
--- /dev/null
+++ b/man/NetoTb2A.1.Rd
@@ -0,0 +1,57 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2A.1.R
+\name{NetoTb2A.1}
+\alias{NetoTb2A.1}
+\title{Tempo de Casa ao Trabalho em 3 Percursos}
+\format{Um \code{data.frame} com 32 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{sai}}{Variável que indica o horário de saída do
+    pesquisador rumo ao destino final.}
+
+\item{dia}{Fator de 5 níveis referentes aos dias da semana em que o
+   pesquisador realizou o trajeto.}
+
+\item{perc}{Fator de 3 níveis referentes ao percurso (trajeto)
+    realizado.}
+
+\item{tem}{Tempo até chegar os destino final, em minutos.}
+
+}}
+\source{
+NETO et al. (2010), Tabela 2A.1, pág. 86.
+}
+\description{
+Foi cronometrado o tempo transcorrido desde o momento em
+   que o ônibus passa por uma ponte no trajeto até a hora que o
+   pesquisador chega à seu destino final. Os dados possem registros
+    do dia da semana e do percurso que foi feito.
+}
+\examples{
+
+data(NetoTb2A.1)
+str(NetoTb2A.1)
+
+library(lattice)
+
+NetoTb2A.1$hora <- as.POSIXct(NetoTb2A.1$sai, format = "\%H:\%M")
+NetoTb2A.1$hora <- as.numeric(difftime(NetoTb2A.1$hora,
+                                       min(NetoTb2A.1$hora),
+                                       units = "mins"))
+
+addmargins(xtabs(~dia + perc, data = NetoTb2A.1))
+
+xyplot(tem ~ hora | perc,
+       type = "p",
+       groups = dia,
+       auto.key = TRUE,
+       par.settings = list(superpose.symbol = list(pch = 19)),
+       data = NetoTb2A.1,
+       xlab = "Ensaio",
+       ylab = "Tempo",
+       main = "Tempo de Viagem")
+
+}
+\keyword{RM}
+
diff --git a/man/NetoTb2A.3.Rd b/man/NetoTb2A.3.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..304dcad7cb3e270142ab55b5e1024ca4bf484958
--- /dev/null
+++ b/man/NetoTb2A.3.Rd
@@ -0,0 +1,47 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2A.3.R
+\name{NetoTb2A.3}
+\alias{NetoTb2A.3}
+\title{Bioequivalencia de Medicamentos Genéricos e de Marca}
+\format{Um \code{data.frame} com 21 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{vol}}{Número do voluntário que foi submetido aos dois
+    medicamentos.}
+
+\item{\code{A}}{Valor da área abaixo da curva da concentração do
+    princípio ativo no sangue no período de 8 horas do medicamento
+    genérico.}
+
+\item{\code{B}}{Valor da área abaixo da curva da concentração do
+    princípio ativo no sangue no período de 8 horas do medicamento de
+    referência.}
+
+}}
+\source{
+NETO et al. (2010), Tabela 2A.3, pág. 93.
+}
+\description{
+Foram ministrados dois medicamentos distintos, um
+    genérico e um de marca, em 21 voluntários e observou-se a área
+    abaixo da curva de concentração do princípio ativo no sangue, em
+    função do tempo, dos indivíduos no período de 8 horas.
+}
+\examples{
+
+data(NetoTb2A.3)
+str(NetoTb2A.3)
+
+library(lattice)
+
+dotplot(reorder(vol, B) ~ A + B,
+        data = NetoTb2A.3,
+        auto.key = TRUE,
+        xlab = "Área abaixo da curva",
+        ylab = "Voluntários\\n(ordenados pelo medicamento de referência)",
+        par.settings = list(superpose.symbol = list(pch = 19)))
+
+}
+\keyword{pareado}
+
diff --git a/man/NetoTb2A.5.Rd b/man/NetoTb2A.5.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..2a3ffb335d9c9fe69e8666cd205cf02f5fe07ae7
--- /dev/null
+++ b/man/NetoTb2A.5.Rd
@@ -0,0 +1,40 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2A.5.R
+\name{NetoTb2A.5}
+\alias{NetoTb2A.5}
+\title{Produtividade de Algas Marinhas}
+\format{Um \code{data.frame} com 10 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{local}}{Local de onde foram extraídas as amostras de
+    alga: A - local com pouca atividade urbana mas com atividade
+    industrial, B - local com muita atividade urbana mas sem
+    atividade industrial.}
+
+\item{\code{teor}}{Teor de agar-agar observado (\%) da alga.}
+
+}}
+\source{
+NETO et al. (2010), Tabela 2A.5, pág. 97.
+}
+\description{
+Teor de agar-agar de algas retiradas de 2 locais com
+    diferentes níveis de atividade industrial.
+}
+\examples{
+
+data(NetoTb2A.5)
+str(NetoTb2A.5)
+
+library(lattice)
+
+bwplot(teor ~ local, data = NetoTb2A.5,
+       par.settings = list(box.dot = list(pch = "|"),
+                           box.umbrella = list(lty = 1, col = 1),
+                           box.rectangle = list(col = 1,
+                                                fill = "gray50")))
+
+}
+\keyword{AAS}
+
diff --git a/man/NetoTb3.3.Rd b/man/NetoTb3.3.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..989768a7f14f518fb74cbd28afe0cdd9775df135
--- /dev/null
+++ b/man/NetoTb3.3.Rd
@@ -0,0 +1,54 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb3.3.R
+\name{NetoTb3.3}
+\alias{NetoTb3.3}
+\title{Rendimento de uma Reação em Função da Temperatura, Catalizador
+    e Concentração}
+\format{Um \code{data.frame} com 16 observações e 5 variáveis, em que
+
+\describe{
+
+\item{\code{f1}}{Temperatura (40 e 60\eqn{^\circ}C).}
+
+\item{\code{f2}}{Tipo de catalisador (A e B).}
+
+\item{\code{f3}}{Concentração (1 e 1.5 M).}
+
+\item{\code{rend}}{Rendimento da reação (\%).}
+
+\item{\code{ord}}{Ordem da realização das corridas.}
+
+}}
+\source{
+NETO et al. (2010), Tabela 3.3, pág. 121.
+}
+\description{
+Resultado de um planejamento fatorial \eqn{2^3}, em
+    duplicata, que estudou o rendimento de uma reação em função dos
+    níveis de temperatura, tipo de catalizador e níveis de
+    concentação.
+}
+\examples{
+
+data(NetoTb3.3)
+str(NetoTb3.3)
+
+par(mfrow = c(1, 3))
+with(NetoTb3.3, {
+    interaction.plot(f1, f2, rend,
+                     ylab = "Rendimento Médio",
+                     main = "Temperatura x Catalizador",
+                     col = "blue")
+    interaction.plot(f1, f3, rend,
+                     ylab = "Rendimento Médio",
+                     main = "Temperatura x Concentração",
+                     col = "green")
+    interaction.plot(f2, f3, rend,
+                     ylab = "Rendimento Médio",
+                     main = "Catalizador x Concentração",
+                     col = "red")
+})
+
+}
+\keyword{FAT2K}
+
diff --git a/man/NetoTb3.6.Rd b/man/NetoTb3.6.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..de3ee42e7ed8f1c34a2f7332b07084097e31ba52
--- /dev/null
+++ b/man/NetoTb3.6.Rd
@@ -0,0 +1,44 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb3.6.R
+\name{NetoTb3.6}
+\alias{NetoTb3.6}
+\title{Influência de Quatro Fatores no Rendimento de uma Reação}
+\format{Um \code{data.frame} com 16 observações e 5 variáveis, em que
+
+\describe{
+
+\item{\code{f1}}{Temperatura (40 e 60\eqn{^\circ}C).}
+
+\item{\code{f2}}{Tipo de catalisador (A e B).}
+
+\item{\code{f3}}{Concentração (1 e 1.5 M).}
+
+\item{\code{f4}}{Acidez (pH 7 e 6).}
+
+\item{rend}{Rendimento de uma reação.}
+
+}}
+\source{
+NETO et al. (2010), Tabela 3.6, pág. 130.
+}
+\description{
+Resultados de um experimento fatorial \eqn{2^4} que
+    estudou o efeito de quatro fatores no rendimento de uma reação
+    química.
+}
+\examples{
+
+library(lattice)
+
+data(NetoTb3.6)
+str(NetoTb3.6)
+
+xyplot(res ~ f1 | f2,
+       groups = interaction(f3, f4, sep = ":"),
+       data = NetoTb3.6,
+       type = c("p", "a"),
+       auto.key = TRUE)
+
+}
+\keyword{FAT2K}
+