diff --git a/R/AndradeTb2.24.R b/R/AndradeTb2.24.R
index 45c74247e6a5be30a079b15c12184a9a18a38284..d366adfe3ab8b3529462cb040aeccf71d5e69694 100644
--- a/R/AndradeTb2.24.R
+++ b/R/AndradeTb2.24.R
@@ -1,9 +1,9 @@
 #' @name AndradeTb2.24
 #' @title Estudo sobre a Adoção de uma Variedade de Arroz
 #' @description Estudo realizado por um economista agrícola que tem
-#'     interesse em identificar a associação entre o tipo de posse de
-#'     terra de [DESCOBRIR QUEM] e sua propensão a adoção da nova
-#'     variedade de arroz.
+#'     interesse em identificar o comportamento da adoção de uma nova
+#'     variedade de arroz altamente produtiva segundo a situação de
+#'     posse de terra.
 #' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que
 #'
 #' \describe{
@@ -11,10 +11,11 @@
 #' \item{\code{posse}}{Identifica o tipo de posse de terra
 #'     (proprietário, único arrendatário e vários arrendatários).}
 #'
-#' \item{\code{adocao}}{Identifica o se há, ou não, a adoção da nova
+#' \item{\code{adocao}}{Identifica o se houve, ou não, a adoção da nova
 #'     variedade de arroz.}
 #'
-#' \item{\code{freq}}{Frequência [DE QUEM? FAZENDEIROS?].}
+#' \item{\code{freq}}{Frequência de terras com as características de
+#'     \code{posse} e \code{adocao}.}
 #'
 #' }
 #' @keywords contingência
@@ -27,7 +28,11 @@
 #' str(AndradeTb2.24)
 #'
 #' xt <- xtabs(freq ~ ., data = AndradeTb2.24)
+#'
 #' xt
+#' prop.table(xt)
+#' prop.table(xt, margin = 1)
+#' prop.table(xt, margin = 2)
 #'
 #' mosaicplot(t(xt), col = c("darkturquoise", "lawngreen", "blue"),
 #'            cex.axis = 0.8, las = 2, main = "")
@@ -41,6 +46,6 @@
 #'              title = "Posse",
 #'              cex.title = 1.1),
 #'          xlab = "Adoção da nova variedade",
-#'          ylab = "Frequência DE ???")
+#'          ylab = "Frequência de terras")
 #'
 NULL
diff --git a/R/AndradeTb2.29.R b/R/AndradeTb2.29.R
index 02cb528a3b72fa84f6840315efb75dd92f07a5d1..2fe1e69ba8f06a3f632268def0f71f24ed09a20a 100644
--- a/R/AndradeTb2.29.R
+++ b/R/AndradeTb2.29.R
@@ -1,5 +1,6 @@
 #' @name AndradeTb2.29
 #' @title Biometria Total do Camarão \emph{Macrobrachium Potiuna}
+#'     (MÜLLER, 1880)
 #' @description Biometria total, em milímetros, do Camarão de água doce
 #'     \emph{Macrobrachium potiuna} (MÜLLER, 1880), da família
 #'     \emph{Palaemonidae}.
@@ -9,8 +10,6 @@
 #'     ciências agrárias e biológicas com noções de experimentação (2nd
 #'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.29, pág. 110)
 #'
-#' @references COLOQUE A REFERENCIA DO MULLER (ATENTE-SE AO ESTILO DE
-#'     REFERÊNCIA)
 #' @examples
 #'
 #' data(AndradeTb2.29)
diff --git a/man/AndradeTb2.24.Rd b/man/AndradeTb2.24.Rd
index 5f8ebf5e81cc40ee4a0c654367847f32c63eca0a..c750a98adbff2b54dc69c369f4df9ad271a6a9d8 100644
--- a/man/AndradeTb2.24.Rd
+++ b/man/AndradeTb2.24.Rd
@@ -10,10 +10,11 @@
 \item{\code{posse}}{Identifica o tipo de posse de terra
     (proprietário, único arrendatário e vários arrendatários).}
 
-\item{\code{adocao}}{Identifica o se há, ou não, a adoção da nova
+\item{\code{adocao}}{Identifica o se houve, ou não, a adoção da nova
     variedade de arroz.}
 
-\item{\code{freq}}{Frequência [DE QUEM? FAZENDEIROS?].}
+\item{\code{freq}}{Frequência de terras com as características de
+    \code{posse} e \code{adocao}.}
 
 }}
 \source{
@@ -23,9 +24,9 @@ Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
 }
 \description{
 Estudo realizado por um economista agrícola que tem
-    interesse em identificar a associação entre o tipo de posse de
-    terra de [DESCOBRIR QUEM] e sua propensão a adoção da nova
-    variedade de arroz.
+    interesse em identificar o comportamento da adoção de uma nova
+    variedade de arroz altamente produtiva segundo a situação de
+    posse de terra.
 }
 \examples{
 
@@ -33,7 +34,11 @@ data(AndradeTb2.24)
 str(AndradeTb2.24)
 
 xt <- xtabs(freq ~ ., data = AndradeTb2.24)
+
 xt
+prop.table(xt)
+prop.table(xt, margin = 1)
+prop.table(xt, margin = 2)
 
 mosaicplot(t(xt), col = c("darkturquoise", "lawngreen", "blue"),
            cex.axis = 0.8, las = 2, main = "")
@@ -47,7 +52,7 @@ barchart(t(xt),
              title = "Posse",
              cex.title = 1.1),
          xlab = "Adoção da nova variedade",
-         ylab = "Frequência DE ???")
+         ylab = "Frequência de terras")
 
 }
 \keyword{contingência}
diff --git a/man/AndradeTb2.29.Rd b/man/AndradeTb2.29.Rd
index a183b72e3821ef0ffdbb8080fa2e6fd34d732dec..32d91f573c3c3bd22cc6a18525d6b2c05e799df4 100644
--- a/man/AndradeTb2.29.Rd
+++ b/man/AndradeTb2.29.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/AndradeTb2.29.R
 \name{AndradeTb2.29}
 \alias{AndradeTb2.29}
-\title{Biometria Total do Camarão \emph{Macrobrachium Potiuna}}
+\title{Biometria Total do Camarão \emph{Macrobrachium Potiuna}
+    (MÜLLER, 1880)}
 \format{Um \code{vetor} numérico com 36 observações.}
 \source{
 Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
@@ -30,10 +31,6 @@ hist(AndradeTb2.29,
 
 lines(density(AndradeTb2.29), lwd = 2)
 
-}
-\references{
-COLOQUE A REFERENCIA DO MULLER (ATENTE-SE AO ESTILO DE
-    REFERÊNCIA)
 }
 \keyword{AAS}