diff --git a/R/NetoEx3.11.R b/R/NetoEx3.11.R
new file mode 100644
index 0000000000000000000000000000000000000000..ba17b33cb522aba1a5b3462fd089cbb0c072cf47
--- /dev/null
+++ b/R/NetoEx3.11.R
@@ -0,0 +1,48 @@
+#' @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.
+#' @format Um \code{data.frame} com 16 observações e 5 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{i}}{Número do ensaio.}
+#'
+#' \item{\code{t}}{Tempo da reação.}
+#'
+#' \item{\code{C}}{Concentração de oxidante.}
+#' 
+#' \item{\code{P}}{Tamanho da partícula.}
+#'
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Exercício 3.11, pág. 126)
+#' @examples
+#'
+#' data(NetoEx3.11)
+#' str(NetoEx3.11)
+#'
+#' par(mfrow=c(1,3))
+#'
+#' attach(NetoEx3.11)
+#'
+#' interaction.plot(t, C, rend,
+#'                  ylab = "Rendimento Médio",
+#'                  main = "Interação entre Tempo de Reação e
+#'                  Concentração de Oxidante",
+#'                  col = "blue")
+#'
+#' interaction.plot(t, P, rend,
+#'                  ylab = "Rendimento Médio",
+#'                  main = "Interação entre Tempo de Reação e Tamanho da
+#'                  Partícula",
+#'                  col = "green")
+#'
+#' interaction.plot(C, P, rend,
+#'                  ylab = "Rendimento Médio",
+#'                  main = "Interação entre Concentração de Oxidente e
+#'                  Tamanho da Partícula",
+#'                  col = "red")
+#'
+NULL
\ No newline at end of file
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/NetoEx3.11.rda b/data/NetoEx3.11.rda
new file mode 100644
index 0000000000000000000000000000000000000000..c7edde745b2e29346252592224684ade58ee260b
Binary files /dev/null and b/data/NetoEx3.11.rda differ
diff --git a/man/NetoEx3.11.Rd b/man/NetoEx3.11.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..d632eca0b7be419a782c23d36116e43e658477f4
--- /dev/null
+++ b/man/NetoEx3.11.Rd
@@ -0,0 +1,56 @@
+% 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 5 variáveis, em que
+
+\describe{
+
+\item{\code{i}}{Número do ensaio.}
+
+\item{\code{t}}{Tempo da reação.}
+
+\item{\code{C}}{Concentração de oxidante.}
+
+\item{\code{P}}{Tamanho da partícula.}
+
+}}
+\source{
+Barros Neto, Benício de (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.
+}
+\examples{
+
+data(NetoEx3.11)
+str(NetoEx3.11)
+
+par(mfrow=c(1,3))
+
+attach(NetoEx3.11)
+
+interaction.plot(t, C, rend,
+                 ylab = "Rendimento Médio",
+                 main = "Interação entre Tempo de Reação e
+                 Concentração de Oxidante",
+                 col = "blue")
+
+interaction.plot(t, P, rend,
+                 ylab = "Rendimento Médio",
+                 main = "Interação entre Tempo de Reação e Tamanho da
+                 Partícula",
+                 col = "green")
+
+interaction.plot(C, P, rend,
+                 ylab = "Rendimento Médio",
+                 main = "Interação entre Concentração de Oxidente e
+                 Tamanho da Partícula",
+                 col = "red")
+
+}
+\keyword{DBC}
+