diff --git a/R/CharnetEx1.20.R b/R/CharnetEx1.20.R
index ed4755f186e9f4accde9438589cec8ccf1246a8f..c966028fb18e883071f2112807a2de0ed7c84d8d 100644
--- a/R/CharnetEx1.20.R
+++ b/R/CharnetEx1.20.R
@@ -1,17 +1,17 @@
 #' @name CharnetEx1.20
 #' 
-#' @title Dois testes de avaliação de personalidade
+#' @title Testes de Avaliação de Personalidade
 #' 
 #' @description Dois testes de avaliação de personalidade aplicados a 20
-#'              indivíduos.
+#'     indivíduos.
 #'
 #' @format Um \code{data.frame} com 2 colunas e 20 linhas.
 #'
 #' \describe{
 #'
-#' \item{\code{t1}}{Teste I}
+#' \item{\code{t1}}{Resultados do teste I, em pontos.}
 #'
-#' \item{\code{t2}}{Teste II}
+#' \item{\code{t2}}{Resultados do teste II, em pontos.}
 #'
 #' }
 #'
@@ -28,4 +28,4 @@
 #'
 #' plot(CharnetEx1.20)
 #'
-NULL
\ No newline at end of file
+NULL
diff --git a/R/CharnetEx1.5.R b/R/CharnetEx1.5.R
index 06539466e30db12a6d32edc397d293294dce8317..3aa756a9daf8866ed60944ed6e0d7058b695ae74 100644
--- a/R/CharnetEx1.5.R
+++ b/R/CharnetEx1.5.R
@@ -1,8 +1,8 @@
 #' @name CharnetEx1.5
 #' 
-#' @title Tempo de duração do intervalo para o cafézinho
+#' @title Tempo de Duração do Intervalo para o Cafezinho
 #' 
-#' @description Tempo de duração do intervalo para o cafézinho para uma
+#' @description Tempo de duração do intervalo para o cafezinho para uma
 #'     amostra de 20 empregados de uma grande empresa.
 #'
 #' @format Um \code{vetor} numérico com 20 observações.
@@ -18,9 +18,13 @@
 #'
 #' data(CharnetEx1.5)
 #'
-#' mean(CharnetEx1.5)
-#' sd(CharnetEx1.5)
+#' (m <- mean(CharnetEx1.5))
+#' (s <- sd(CharnetEx1.5))
 #' fivenum(CharnetEx1.5)
 #'
-#'
+#' curve(dnorm(x, m, s),
+#'       xlim = extendrange(CharnetEx1.5, f = 0.2),
+#'       col = 4, lwd = 2)
+#' hist(CharnetEx1.5, prob = TRUE, add = TRUE)
+#' rug(CharnetEx1.5)
 NULL
diff --git a/R/CharnetEx1.6.R b/R/CharnetEx1.6.R
index cbfe8b2bba03cf6852d56b38aa0b91258c6100b1..91cbd4876fe5127cf1e9dbe1b3f7236899c45822 100644
--- a/R/CharnetEx1.6.R
+++ b/R/CharnetEx1.6.R
@@ -1,6 +1,6 @@
 #' @name CharnetEx1.6
 #' 
-#' @title Pressão sanguínea sistólica
+#' @title Pressão Sanguínea Sistólica
 #' 
 #' @description Pressão sanguínea sistólica de um grupo de 16 pacientes
 #'     de uma clínica.
@@ -18,8 +18,14 @@
 #'
 #' data(CharnetEx1.6)
 #'
-#' mean(CharnetEx1.6)
-#' sd(CharnetEx1.6)
+#' (m <- mean(CharnetEx1.6))
+#' (s <- sd(CharnetEx1.6))
 #' fivenum(CharnetEx1.6)
+#'
+#' curve(dnorm(x, m, s),
+#'       xlim = extendrange(CharnetEx1.6, f = 0.2),
+#'       col = 4, lwd = 2)
+#' hist(CharnetEx1.6, prob = TRUE, add = TRUE)
+#' rug(CharnetEx1.6)
 #' 
-NULL
\ No newline at end of file
+NULL
diff --git a/R/CharnetEx2.10.R b/R/CharnetEx2.10.R
index 26e143e82a84817e21f1ff433de4222d21df11c0..b386d281965b736b66f2c6f0a47a545749338818 100644
--- a/R/CharnetEx2.10.R
+++ b/R/CharnetEx2.10.R
@@ -1,17 +1,18 @@
 #' @name CharnetEx2.10
 #' 
-#' @title Estudo do efeito do Carbono na Resistência Elétrica
+#' @title Estudo do Efeito do Carbono na Resistência Elétrica
 #' 
-#' @description Estudo do efeito do Carbono na Resistência Elétrica na
-#'              temperatura de 20ºC
+#' @description Estudo sobre o efeito do carbono contido, em fios de aço
+#'     em resistência elétrica, na temperatura de 20ºC.
 #'
 #' @format Um \code{data.frame} com 2 colunas e 15 linhas.
 #'
 #' \describe{
 #'
-#' \item{\code{carb}}{Porcentagem de carbono em fios de aço}
+#' \item{\code{carb}}{Porcentagem de carbono nos fios de aço.}
 #'
-#' \item{\code{res}}{Resistência elétrica em ohms a 20ºC}
+#' \item{\code{res}}{Resistência elétrica, mensurada em \eqn{\mu} ohms
+#'     cm a 20ºC.}
 #'
 #' }
 #'
@@ -26,6 +27,7 @@
 #'
 #' data(CharnetEx2.10)
 #'
-#'plot(CharnetEx2.10)
+#' plot(CharnetEx2.10)
+#' abline(lm(res ~ carb, data = CharnetEx2.10))
 #'
-NULL
\ No newline at end of file
+NULL
diff --git a/R/CharnetEx2.9.R b/R/CharnetEx2.9.R
index faff72b76779cb5e681ec156aecb1f30875ed9d2..91be4143efc1aff0c578a100f6e2e1825c384f28 100644
--- a/R/CharnetEx2.9.R
+++ b/R/CharnetEx2.9.R
@@ -1,15 +1,15 @@
 #' @name CharnetEx2.9
 #' 
-#' @title Notas de candidatos ao vestibular
+#' @title Notas de Candidatos ao Vestibular
 #' 
-#' @description Notas de 9 candidatos ao vestibular nas provas de 
-#'              Matemática e Física.
+#' @description Notas de 9 candidatos ao vestibular nas provas de
+#'     Matemática e Física.
 #'
 #' @format Um \code{data.frame} com 2 colunas e 9 linhas.
 #'
 #' \describe{
 #'
-#' \item{\code{prova}}{Área da prova no vestibular}
+#' \item{\code{prova}}{Área da prova no vestibular.}
 #'
 #' \item{\code{nota}}{Nota obtida no teste, em escala de 0 a 100.}
 #'
@@ -25,7 +25,13 @@
 #' @examples
 #'
 #' data(CharnetEx2.9)
-#' 
+#'
 #' plot(CharnetEx2.9)
 #'
-NULL
\ No newline at end of file
+#' # Dados no formato largo (wide) para visualização dos pares
+#' data.wide <- unstack(CharnetEx2.9, form = nota ~ prova)
+#'
+#' plot(data.wide)
+#' abline(a = 0, b = 1)
+#'
+NULL
diff --git a/man/CharnetEx1.20.Rd b/man/CharnetEx1.20.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..59fb532f2f60fc9c8be525c45033202c24d2cb1d
--- /dev/null
+++ b/man/CharnetEx1.20.Rd
@@ -0,0 +1,33 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CharnetEx1.20.R
+\name{CharnetEx1.20}
+\alias{CharnetEx1.20}
+\title{Testes de Avaliação de Personalidade}
+\format{Um \code{data.frame} com 2 colunas e 20 linhas.
+
+\describe{
+
+\item{\code{t1}}{Resultados do teste I, em pontos.}
+
+\item{\code{t2}}{Resultados do teste II, em pontos.}
+
+}}
+\source{
+Charnet, R., de Luna Freire, C.A., Charnet, E.M.R. & Bonvino,
+    H. (2008). Análise de modelos de regressão linear com aplicações
+    (2nd ed., p. 356). SP: Editora Unicamp (Capítulo 1, exercício 20,
+    página 26)
+}
+\description{
+Dois testes de avaliação de personalidade aplicados a 20
+    indivíduos.
+}
+\examples{
+
+data(CharnetEx1.20)
+
+plot(CharnetEx1.20)
+
+}
+\keyword{TODO}
+
diff --git a/man/CharnetEx1.5.Rd b/man/CharnetEx1.5.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..5c3309249708f936e559f29178ccbe834879e5d3
--- /dev/null
+++ b/man/CharnetEx1.5.Rd
@@ -0,0 +1,32 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CharnetEx1.5.R
+\name{CharnetEx1.5}
+\alias{CharnetEx1.5}
+\title{Tempo de Duração do Intervalo para o Cafezinho}
+\format{Um \code{vetor} numérico com 20 observações.}
+\source{
+Charnet, R., de Luna Freire, C.A., Charnet, E.M.R. & Bonvino,
+    H. (2008). Análise de modelos de regressão linear com aplicações
+    (2nd ed., p. 356). SP: Editora Unicamp (Capítulo 1, exercício 5,
+    pág. 23)
+}
+\description{
+Tempo de duração do intervalo para o cafezinho para uma
+    amostra de 20 empregados de uma grande empresa.
+}
+\examples{
+
+data(CharnetEx1.5)
+
+(m <- mean(CharnetEx1.5))
+(s <- sd(CharnetEx1.5))
+fivenum(CharnetEx1.5)
+
+curve(dnorm(x, m, s),
+      xlim = extendrange(CharnetEx1.5, f = 0.2),
+      col = 4, lwd = 2)
+hist(CharnetEx1.5, prob = TRUE, add = TRUE)
+rug(CharnetEx1.5)
+}
+\keyword{amostra}
+
diff --git a/man/CharnetEx1.6.Rd b/man/CharnetEx1.6.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..7cada09e799d3b4b0d901a0c4f1dcea6354977f5
--- /dev/null
+++ b/man/CharnetEx1.6.Rd
@@ -0,0 +1,33 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CharnetEx1.6.R
+\name{CharnetEx1.6}
+\alias{CharnetEx1.6}
+\title{Pressão Sanguínea Sistólica}
+\format{Um \code{vetor} numérico com 16 observações.}
+\source{
+Charnet, R., de Luna Freire, C.A., Charnet, E.M.R. & Bonvino,
+    H. (2008). Análise de modelos de regressão linear com aplicações
+    (2nd ed., p. 356). SP: Editora Unicamp (Capítulo 1, exercício 6,
+    página 23)
+}
+\description{
+Pressão sanguínea sistólica de um grupo de 16 pacientes
+    de uma clínica.
+}
+\examples{
+
+data(CharnetEx1.6)
+
+(m <- mean(CharnetEx1.6))
+(s <- sd(CharnetEx1.6))
+fivenum(CharnetEx1.6)
+
+curve(dnorm(x, m, s),
+      xlim = extendrange(CharnetEx1.6, f = 0.2),
+      col = 4, lwd = 2)
+hist(CharnetEx1.6, prob = TRUE, add = TRUE)
+rug(CharnetEx1.6)
+
+}
+\keyword{amostra}
+
diff --git a/man/CharnetEx2.10.Rd b/man/CharnetEx2.10.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..2c5f4089b491efc4db0e1145dc831840f2de373f
--- /dev/null
+++ b/man/CharnetEx2.10.Rd
@@ -0,0 +1,35 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CharnetEx2.10.R
+\name{CharnetEx2.10}
+\alias{CharnetEx2.10}
+\title{Estudo do Efeito do Carbono na Resistência Elétrica}
+\format{Um \code{data.frame} com 2 colunas e 15 linhas.
+
+\describe{
+
+\item{\code{carb}}{Porcentagem de carbono nos fios de aço.}
+
+\item{\code{res}}{Resistência elétrica, mensurada em \eqn{\mu} ohms
+    cm a 20ºC.}
+
+}}
+\source{
+Charnet, R., de Luna Freire, C.A., Charnet, E.M.R. & Bonvino,
+    H. (2008). Análise de modelos de regressão linear com aplicações
+    (2nd ed., p. 356). SP: Editora Unicamp (Capítulo 2, exercício 10,
+    página 47)
+}
+\description{
+Estudo sobre o efeito do carbono contido, em fios de aço
+    em resistência elétrica, na temperatura de 20ºC.
+}
+\examples{
+
+data(CharnetEx2.10)
+
+plot(CharnetEx2.10)
+abline(lm(res ~ carb, data = CharnetEx2.10))
+
+}
+\keyword{TODO}
+
diff --git a/man/CharnetEx2.9.Rd b/man/CharnetEx2.9.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..55159d8e7b1025d1bbaa2ee553380758c14e1c9c
--- /dev/null
+++ b/man/CharnetEx2.9.Rd
@@ -0,0 +1,39 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CharnetEx2.9.R
+\name{CharnetEx2.9}
+\alias{CharnetEx2.9}
+\title{Notas de Candidatos ao Vestibular}
+\format{Um \code{data.frame} com 2 colunas e 9 linhas.
+
+\describe{
+
+\item{\code{prova}}{Área da prova no vestibular.}
+
+\item{\code{nota}}{Nota obtida no teste, em escala de 0 a 100.}
+
+}}
+\source{
+Charnet, R., de Luna Freire, C.A., Charnet, E.M.R. & Bonvino,
+    H. (2008). Análise de modelos de regressão linear com aplicações
+    (2nd ed., p. 356). SP: Editora Unicamp (Capítulo 2, exercício 9,
+    página 47)
+}
+\description{
+Notas de 9 candidatos ao vestibular nas provas de
+    Matemática e Física.
+}
+\examples{
+
+data(CharnetEx2.9)
+
+plot(CharnetEx2.9)
+
+# Dados no formato largo (wide) para visualização dos pares
+data.wide <- unstack(CharnetEx2.9, form = nota ~ prova)
+
+plot(data.wide)
+abline(a = 0, b = 1)
+
+}
+\keyword{TODO}
+