diff --git a/R/AndradeEx2.13.R b/R/AndradeEx2.13.R
new file mode 100644
index 0000000000000000000000000000000000000000..b44e456e5550eeb0a24551cd8024304aee5330ed
--- /dev/null
+++ b/R/AndradeEx2.13.R
@@ -0,0 +1,28 @@
+#' @name AndradeEx2.13
+#' @title Estudo dos Ovos de \emph{Biomphalaria Taenagophila}
+#' @description Estudo da distribuição do número de ovos inviáveis de
+#'     \emph{Biomphalaria taenagophila} (caramujo) em ambiente
+#'     poluído. Para isso tomou-se uma amostra de 23 caramujos.
+#' @format Um \code{vetor} numérico com 23 observações.
+#' @keywords AAS
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 2, Exercício
+#'     13, pág. 109)
+#' @examples
+#'
+#' data(AndradeEx2.13)
+#' str(AndradeEx2.13)
+#'
+#' hist(AndradeEx2.13,
+#'      labels = TRUE,
+#'      prob = TRUE,
+#'      main = NULL,
+#'      col = "darkturquoise",
+#'      ylim = c(0, 0.12),
+#'      xlab = "Número de Ovos",
+#'      ylab = "Densidade")
+#'
+#' lines(density(AndradeEx2.13), lwd = 2)
+#'
+NULL
diff --git a/R/AndradeTb2.24.R b/R/AndradeTb2.24.R
new file mode 100644
index 0000000000000000000000000000000000000000..d366adfe3ab8b3529462cb040aeccf71d5e69694
--- /dev/null
+++ b/R/AndradeTb2.24.R
@@ -0,0 +1,51 @@
+#' @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 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{
+#'
+#' \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 houve, ou não, a adoção da nova
+#'     variedade de arroz.}
+#'
+#' \item{\code{freq}}{Frequência de terras com as características de
+#'     \code{posse} e \code{adocao}.}
+#'
+#' }
+#' @keywords contingência
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.24, pág. 106)
+#' @examples
+#'
+#' 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 = "")
+#'
+#' library(lattice)
+#' barchart(t(xt),
+#'          horizontal = FALSE,
+#'          stack = TRUE,
+#'          auto.key = list(
+#'              corner= c(0.9, 0.9),
+#'              title = "Posse",
+#'              cex.title = 1.1),
+#'          xlab = "Adoção da nova variedade",
+#'          ylab = "Frequência de terras")
+#'
+NULL
diff --git a/R/AndradeTb2.25.R b/R/AndradeTb2.25.R
new file mode 100644
index 0000000000000000000000000000000000000000..655f105bbb769abce771bba450bc2e9a9cce7f82
--- /dev/null
+++ b/R/AndradeTb2.25.R
@@ -0,0 +1,50 @@
+#' @name AndradeTb2.25
+#' @title Experimento de Germinação de Cultivares de Cebola
+#' @description Experimento com o objetivo de avaliar o poder
+#'     germinativo de duas cultivares de cebola. Foram utilizadas, para
+#'     o teste de germinação, quatro repetições de cem sementes
+#'     totalizando quatrocentas sementes para cada cultivar. Nesse
+#'     experimento mensurou-se apenas a frequência das sementes que
+#'     germinaram, ou não, dentre as repetições de cada cultivar.
+#' @format Um \code{data.frame} com 4 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{cult}}{Cultivares de cebola avaliadas (Bola
+#'     Precoce-EMPASC 352, \code{Bola 352} e Norte 14, \code{Norte
+#'     14}).}
+#'
+#' \item{\code{germ}}{Identifica se houve, ou não, a germinação da
+#'     semente.}
+#'
+#' \item{\code{freq}}{Número de sementes, no cruzamento de \code{cult} e
+#'     \code{germ}.}
+#'
+#' }
+#' @keywords contingência
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.25, pág. 107)
+#' @examples
+#'
+#' data(AndradeTb2.25)
+#' str(AndradeTb2.25)
+#'
+#' xt <- xtabs(freq ~ ., data = AndradeTb2.25)
+#' xt
+#'
+#' mosaicplot(t(xt), col = c("darkturquoise", "lawngreen"),
+#'            cex.axis = 0.8, las = 2, main = "")
+#'
+#' library(lattice)
+#' barchart(t(xt),
+#'          horizontal = FALSE,
+#'          stack = FALSE,
+#'          auto.key = list(
+#'              corner= c(0.9, 0.9),
+#'              title = "Cultivar",
+#'              cex.title = 1.1),
+#'          xlab = "Adoção da nova variedade",
+#'          ylab = "Número de sementes")
+#'
+NULL
diff --git a/R/AndradeTb2.26.R b/R/AndradeTb2.26.R
new file mode 100644
index 0000000000000000000000000000000000000000..cc7c3d8901501a3ac00ee5dd49fe90bbb12e7efd
--- /dev/null
+++ b/R/AndradeTb2.26.R
@@ -0,0 +1,46 @@
+#' @name AndradeTb2.26
+#' @title Estudo de Associação entre Local de Coleta e Peso de Mexilhões
+#' @description Estudo observacional cujo interesse é verificar se
+#'     existe associação entre o local de coleta de mexilhões e o peso
+#'     deles.
+#' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{local}}{Local de coleta dos mexilhões (Mangue e
+#'     Sambaqui).}
+#'
+#' \item{\code{peso}}{Pesos dos mexilhões, em gramas. A variável foi
+#'     categorizada em três níveis (7-20, 21-33 e 34-46 gramas).}
+#'
+#' \item{\code{freq}}{Número de mexilhões no cruzamento de \code{local}
+#'     com \code{peso}.}
+#'
+#' }
+#' @keywords contingência
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.26, pág. 107)
+#' @examples
+#'
+#' data(AndradeTb2.26)
+#' str(AndradeTb2.26)
+#'
+#' xt <- xtabs(freq ~ ., data = AndradeTb2.26)
+#' xt
+#'
+#' mosaicplot(t(xt), col = c("darkturquoise", "lawngreen"),
+#'            cex.axis = 0.8, las = 2, main = "")
+#'
+#' library(lattice)
+#' barchart(t(xt),
+#'          horizontal = FALSE,
+#'          stack = TRUE,
+#'          auto.key = list(
+#'              columns = 2,
+#'              title = "Local de coleta",
+#'              cex.title = 1.1),
+#'          xlab = "Peso do mexilhão",
+#'          ylab = "Número de mexilhões")
+#'
+NULL
diff --git a/R/AndradeTb2.27.R b/R/AndradeTb2.27.R
new file mode 100644
index 0000000000000000000000000000000000000000..5366ce39bd6440ff6d9940b878caa06ff6e01178
--- /dev/null
+++ b/R/AndradeTb2.27.R
@@ -0,0 +1,50 @@
+#' @name AndradeTb2.27
+#' @title Estudo da Eficiência de uma Vacina Antigripal
+#' @description Estudo para avaliar a eficiência de uma nova vacina
+#'     antigripal, a qual foi administrada aos membros de uma pequena
+#'     comunidade, em duas doses, ao longo de duas semanas. Algumas
+#'     pessoas tomaram as duas doses, outras tomaram apenas a primeira
+#'     dose e outras não tomaram nenhuma dose. Os tratamentos foram
+#'     aplicados em 1000 habitantes dessa comunidade.
+#' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{saude}}{Estado de saúde dos habitantes (gripados ou não
+#'     gripados).}
+#'
+#' \item{\code{vacina}}{identifica em quantas doses a vacina antigripal
+#'     foi aplicada (0, não houve aplicação; 1, em dose única; 2, em
+#'     duas doses).}
+#'
+#' \item{\code{freq}}{Número de habitantes no cruzamento de \code{saude}
+#'     e \code{vacina}.}
+#'
+#' }
+#' @keywords contigência
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.27, pág. 108)
+#' @examples
+#'
+#' data(AndradeTb2.27)
+#' str(AndradeTb2.27)
+#'
+#' xt <- xtabs(freq ~ ., data = AndradeTb2.27)
+#' xt
+#'
+#' mosaicplot(xt, col = c("darkturquoise", "lawngreen", "blue"),
+#'            cex.axis = 0.8, main = "")
+#'
+#' library(lattice)
+#' barchart(t(xt),
+#'          horizontal = FALSE,
+#'          stack = TRUE,
+#'          auto.key = list(
+#'              corner= c(0.9, 0.9),
+#'              title = "Estado de saúde",
+#'              cex.title = 1.1),
+#'          xlab = "Número de doses da vacina",
+#'          ylab = "Número de habitantes")
+#'
+NULL
diff --git a/R/AndradeTb2.28.R b/R/AndradeTb2.28.R
new file mode 100644
index 0000000000000000000000000000000000000000..a5c63138ec52b4734ca01c2c22d03476979e7d20
--- /dev/null
+++ b/R/AndradeTb2.28.R
@@ -0,0 +1,38 @@
+#' @name AndradeTb2.28
+#' @title Número de Brotos por Explante de Abacaxi
+#' @description Número de brotos por explante de abacaxi avaliada em
+#'     dois meios de cultura.
+#' @format Um \code{data.frame} com 26 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{meio}}{Meios de cultura em que os explantes de abacaxi
+#'     foram mantidos.}
+#'
+#' \item{\code{nbroto}}{Número de brotos por explante de abacaxi.}
+#'
+#' }
+#' @keywords AASI
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.28, pág. 109)
+#' @examples
+#'
+#' data(AndradeTb2.28)
+#' str(AndradeTb2.28)
+#'
+#' with(AndradeTb2.28, by(nbroto, meio, summary))
+#'
+#' library(lattice)
+#'
+#' bwplot(nbroto ~ meio,
+#'        data = AndradeTb2.28,
+#'        xlab = "Meio de Cultura",
+#'        ylab = "Número de Brotos")
+#'
+#' densityplot(~nbroto,
+#'             groups = meio,
+#'             grid = TRUE,
+#'             data = AndradeTb2.28)
+#'
+NULL
diff --git a/R/AndradeTb2.29.R b/R/AndradeTb2.29.R
new file mode 100644
index 0000000000000000000000000000000000000000..2fe1e69ba8f06a3f632268def0f71f24ed09a20a
--- /dev/null
+++ b/R/AndradeTb2.29.R
@@ -0,0 +1,29 @@
+#' @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}.
+#' @format Um \code{vetor} numérico com 36 observações.
+#' @keywords AAS
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     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)
+#'
+#' @examples
+#'
+#' data(AndradeTb2.29)
+#' str(AndradeTb2.29)
+#'
+#' hist(AndradeTb2.29,
+#'      labels = TRUE,
+#'      prob = TRUE,
+#'      main = NULL,
+#'      col = "darkturquoise",
+#'      ylim = c(0, 0.071),
+#'      xlab = "Biometria Total (em mm)",
+#'      ylab = "Densidade")
+#'
+#' lines(density(AndradeTb2.29), lwd = 2)
+#'
+NULL
diff --git a/R/AndradeTb2.31.R b/R/AndradeTb2.31.R
new file mode 100644
index 0000000000000000000000000000000000000000..f54e41c7b4ad533ea996e05225a443d4a3e0056b
--- /dev/null
+++ b/R/AndradeTb2.31.R
@@ -0,0 +1,35 @@
+#' @name AndradeTb2.31
+#' @title Efeito do Rizóbio na Altura das Plantas
+#' @description Altura de plantas, medida em centímetros, para dois
+#'     tratamentos, no qual um tratamento é o controle, isto é, não foi
+#'     feita a inoculação do rizóbio nas plantas e o outro corresponde à
+#'     aplicação de rizóbio nas plantas (rizóbios tem a capacidade de
+#'     fixar o nitrogênio atmosférico e fornecê-lo às culturas).
+#' @format Um \code{data.frame} com 40 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{trat}}{Indica o tratamento aplicado às plantas (com
+#'     rizóbio ou controle).}
+#'
+#' \item{\code{altura}}{Altura das plantas, medida em cm.}
+#'
+#' }
+#' @keywords AASI
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.31, pág. 111)
+#' @examples
+#'
+#' data(AndradeTb2.31)
+#' str(AndradeTb2.31)
+#'
+#' with(AndradeTb2.31, by(altura, trat, summary))
+#'
+#' library(lattice)
+#' bwplot(altura ~ trat,
+#'        data = AndradeTb2.31,
+#'        xlab = "Tratamento",
+#'        ylab = "Altura")
+#'
+NULL
diff --git a/data-raw/AndradeEx2.13.txt b/data-raw/AndradeEx2.13.txt
new file mode 100644
index 0000000000000000000000000000000000000000..953dd74b0735673d4e8a38a2442cfb79afa6d461
--- /dev/null
+++ b/data-raw/AndradeEx2.13.txt
@@ -0,0 +1,23 @@
+9
+11
+10
+0
+4
+4
+5
+12
+4
+1
+2
+8
+4
+7
+1
+11
+10
+3
+14
+3
+2
+22
+4
diff --git a/data-raw/AndradeTb2.24.txt b/data-raw/AndradeTb2.24.txt
new file mode 100644
index 0000000000000000000000000000000000000000..aabe333de73c868e65104263dd30054cc74b3ba9
--- /dev/null
+++ b/data-raw/AndradeTb2.24.txt
@@ -0,0 +1,7 @@
+posse	adocao	freq
+proprietário	Sim	102
+vários arrendatários	Sim	42
+único arrendatário	Sim	5
+proprietário	Não	26
+vários arrendatários	Não	10
+único arrendatário	Não	2
diff --git a/data-raw/AndradeTb2.25.txt b/data-raw/AndradeTb2.25.txt
new file mode 100644
index 0000000000000000000000000000000000000000..3dfdab77fa3dd16b4ab48e919d1ab438ce2eb74d
--- /dev/null
+++ b/data-raw/AndradeTb2.25.txt
@@ -0,0 +1,5 @@
+cult	germ	freq
+Bola 352	Sim	392
+Norte 14	Sim	381
+Bola 352	Não	8
+Norte 14	Não	19
diff --git a/data-raw/AndradeTb2.26.txt b/data-raw/AndradeTb2.26.txt
new file mode 100644
index 0000000000000000000000000000000000000000..cb6613ffbd205576fd5e258c7e9642df93da29c8
--- /dev/null
+++ b/data-raw/AndradeTb2.26.txt
@@ -0,0 +1,7 @@
+local	peso	freq
+Mangue	21-33	21
+Sambaqui	34-46	1
+Mangue	7-20	12
+Sambaqui	21-33	14
+Mangue	34-46	2
+Sambaqui	7-20	20
diff --git a/data-raw/AndradeTb2.27.txt b/data-raw/AndradeTb2.27.txt
new file mode 100644
index 0000000000000000000000000000000000000000..f05c80fbe078920ac5c1d5f903be9270e7dc9c09
--- /dev/null
+++ b/data-raw/AndradeTb2.27.txt
@@ -0,0 +1,7 @@
+saude	vacina	freq
+gripados	1	24
+não gripados	1	289
+gripados	2	9
+não gripados	2	100
+gripados	0	13
+não gripados	0	565
diff --git a/data-raw/AndradeTb2.28.txt b/data-raw/AndradeTb2.28.txt
new file mode 100644
index 0000000000000000000000000000000000000000..3703ad0ccfff77955c81b99263f32a67ab20a80a
--- /dev/null
+++ b/data-raw/AndradeTb2.28.txt
@@ -0,0 +1,27 @@
+meio	nbroto
+1	47
+1	35
+1	23
+1	21
+1	24
+1	26
+1	18
+1	30
+1	22
+1	36
+1	22
+1	21
+1	19
+2	13
+2	11
+2	15
+2	24
+2	20
+2	20
+2	19
+2	18
+2	22
+2	22
+2	20
+2	17
+2	25
diff --git a/data-raw/AndradeTb2.29.txt b/data-raw/AndradeTb2.29.txt
new file mode 100644
index 0000000000000000000000000000000000000000..c98f58fd4b5c65a811b05534e95fd83b60723b21
--- /dev/null
+++ b/data-raw/AndradeTb2.29.txt
@@ -0,0 +1,36 @@
+25.6
+39.2
+35.55
+33.75
+27.75
+41.75
+36.7
+34.75
+29.95
+44.05
+38.9
+35.1
+32.2
+25.9
+39.55
+35.65
+33.9
+28.3
+42.8
+37.05
+34.75
+31.25
+45.2
+39.1
+35.2
+32.2
+25.9
+40.45
+36
+33.95
+29.05
+43.95
+37.1
+34.8
+31.7
+46.74
diff --git a/data-raw/AndradeTb2.31.txt b/data-raw/AndradeTb2.31.txt
new file mode 100644
index 0000000000000000000000000000000000000000..f11a4e982bc0001213d601dd9cedac3d68159bfa
--- /dev/null
+++ b/data-raw/AndradeTb2.31.txt
@@ -0,0 +1,41 @@
+trat	altura
+controle	25
+controle	29
+controle	29
+controle	30
+controle	31
+controle	31
+controle	32
+controle	32
+controle	33
+controle	33
+controle	35
+controle	36
+controle	36
+controle	37
+controle	37
+controle	38
+controle	38
+controle	40
+controle	41
+controle	43
+com rizóbio	34
+com rizóbio	36
+com rizóbio	39
+com rizóbio	39
+com rizóbio	40
+com rizóbio	41
+com rizóbio	41
+com rizóbio	41
+com rizóbio	42
+com rizóbio	44
+com rizóbio	44
+com rizóbio	45
+com rizóbio	45
+com rizóbio	46
+com rizóbio	46
+com rizóbio	47
+com rizóbio	47
+com rizóbio	49
+com rizóbio	49
+com rizóbio	51
diff --git a/data/AndradeEx2.13.rda b/data/AndradeEx2.13.rda
new file mode 100644
index 0000000000000000000000000000000000000000..a1efbca5b49e1156f403f9894615a91ac9da7fb2
Binary files /dev/null and b/data/AndradeEx2.13.rda differ
diff --git a/data/AndradeTb2.24.rda b/data/AndradeTb2.24.rda
new file mode 100644
index 0000000000000000000000000000000000000000..a2814ccf60ec440f86c0fc0d6f80bd4b951ea03f
Binary files /dev/null and b/data/AndradeTb2.24.rda differ
diff --git a/data/AndradeTb2.25.rda b/data/AndradeTb2.25.rda
new file mode 100644
index 0000000000000000000000000000000000000000..8555e38d9797c68faf9a115885ca0cc84cc4dd12
Binary files /dev/null and b/data/AndradeTb2.25.rda differ
diff --git a/data/AndradeTb2.26.rda b/data/AndradeTb2.26.rda
new file mode 100644
index 0000000000000000000000000000000000000000..581df906cbd6db04f7235c3ab23c45f6fddc7192
Binary files /dev/null and b/data/AndradeTb2.26.rda differ
diff --git a/data/AndradeTb2.27.rda b/data/AndradeTb2.27.rda
new file mode 100644
index 0000000000000000000000000000000000000000..47e0f694713e7bf69ec6085f2a5958e7e124342f
Binary files /dev/null and b/data/AndradeTb2.27.rda differ
diff --git a/data/AndradeTb2.28.rda b/data/AndradeTb2.28.rda
new file mode 100644
index 0000000000000000000000000000000000000000..d3fdd9f0da94e01297934d1281c99082dd0ff056
Binary files /dev/null and b/data/AndradeTb2.28.rda differ
diff --git a/data/AndradeTb2.29.rda b/data/AndradeTb2.29.rda
new file mode 100644
index 0000000000000000000000000000000000000000..897cc5ce54b6507b07881a15872e0021b46c9fbf
Binary files /dev/null and b/data/AndradeTb2.29.rda differ
diff --git a/data/AndradeTb2.31.rda b/data/AndradeTb2.31.rda
new file mode 100644
index 0000000000000000000000000000000000000000..66088261c60b4f4f44774bd766bff61fc3427e18
Binary files /dev/null and b/data/AndradeTb2.31.rda differ
diff --git a/man/AndradeEx2.13.Rd b/man/AndradeEx2.13.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..597dfc2a15b8c011884d98361f9575c53dcc4eb1
--- /dev/null
+++ b/man/AndradeEx2.13.Rd
@@ -0,0 +1,36 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx2.13.R
+\name{AndradeEx2.13}
+\alias{AndradeEx2.13}
+\title{Estudo dos Ovos de \emph{Biomphalaria Taenagophila}}
+\format{Um \code{vetor} numérico com 23 observações.}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 2, Exercício
+    13, pág. 109)
+}
+\description{
+Estudo da distribuição do número de ovos inviáveis de
+    \emph{Biomphalaria taenagophila} (caramujo) em ambiente
+    poluído. Para isso tomou-se uma amostra de 23 caramujos.
+}
+\examples{
+
+data(AndradeEx2.13)
+str(AndradeEx2.13)
+
+hist(AndradeEx2.13,
+     labels = TRUE,
+     prob = TRUE,
+     main = NULL,
+     col = "darkturquoise",
+     ylim = c(0, 0.12),
+     xlab = "Número de Ovos",
+     ylab = "Densidade")
+
+lines(density(AndradeEx2.13), lwd = 2)
+
+}
+\keyword{AAS}
+
diff --git a/man/AndradeTb2.24.Rd b/man/AndradeTb2.24.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..c750a98adbff2b54dc69c369f4df9ad271a6a9d8
--- /dev/null
+++ b/man/AndradeTb2.24.Rd
@@ -0,0 +1,59 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.24.R
+\name{AndradeTb2.24}
+\alias{AndradeTb2.24}
+\title{Estudo sobre a Adoção de uma Variedade de Arroz}
+\format{Um \code{data.frame} com 6 observações e 3 variáveis, em que
+
+\describe{
+
+\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 houve, ou não, a adoção da nova
+    variedade de arroz.}
+
+\item{\code{freq}}{Frequência de terras com as características de
+    \code{posse} e \code{adocao}.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.24, pág. 106)
+}
+\description{
+Estudo realizado por um economista agrícola que tem
+    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{
+
+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 = "")
+
+library(lattice)
+barchart(t(xt),
+         horizontal = FALSE,
+         stack = TRUE,
+         auto.key = list(
+             corner= c(0.9, 0.9),
+             title = "Posse",
+             cex.title = 1.1),
+         xlab = "Adoção da nova variedade",
+         ylab = "Frequência de terras")
+
+}
+\keyword{contingência}
+
diff --git a/man/AndradeTb2.25.Rd b/man/AndradeTb2.25.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..1676ef4d2269c52923fd2ce5535dea60f3a49d6d
--- /dev/null
+++ b/man/AndradeTb2.25.Rd
@@ -0,0 +1,58 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.25.R
+\name{AndradeTb2.25}
+\alias{AndradeTb2.25}
+\title{Experimento de Germinação de Cultivares de Cebola}
+\format{Um \code{data.frame} com 4 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{cult}}{Cultivares de cebola avaliadas (Bola
+    Precoce-EMPASC 352, \code{Bola 352} e Norte 14, \code{Norte
+    14}).}
+
+\item{\code{germ}}{Identifica se houve, ou não, a germinação da
+    semente.}
+
+\item{\code{freq}}{Número de sementes, no cruzamento de \code{cult} e
+    \code{germ}.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.25, pág. 107)
+}
+\description{
+Experimento com o objetivo de avaliar o poder
+    germinativo de duas cultivares de cebola. Foram utilizadas, para
+    o teste de germinação, quatro repetições de cem sementes
+    totalizando quatrocentas sementes para cada cultivar. Nesse
+    experimento mensurou-se apenas a frequência das sementes que
+    germinaram, ou não, dentre as repetições de cada cultivar.
+}
+\examples{
+
+data(AndradeTb2.25)
+str(AndradeTb2.25)
+
+xt <- xtabs(freq ~ ., data = AndradeTb2.25)
+xt
+
+mosaicplot(t(xt), col = c("darkturquoise", "lawngreen"),
+           cex.axis = 0.8, las = 2, main = "")
+
+library(lattice)
+barchart(t(xt),
+         horizontal = FALSE,
+         stack = FALSE,
+         auto.key = list(
+             corner= c(0.9, 0.9),
+             title = "Cultivar",
+             cex.title = 1.1),
+         xlab = "Adoção da nova variedade",
+         ylab = "Número de sementes")
+
+}
+\keyword{contingência}
+
diff --git a/man/AndradeTb2.26.Rd b/man/AndradeTb2.26.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..2eb021a664b350be55e09734999f5729d7572039
--- /dev/null
+++ b/man/AndradeTb2.26.Rd
@@ -0,0 +1,54 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.26.R
+\name{AndradeTb2.26}
+\alias{AndradeTb2.26}
+\title{Estudo de Associação entre Local de Coleta e Peso de Mexilhões}
+\format{Um \code{data.frame} com 6 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{local}}{Local de coleta dos mexilhões (Mangue e
+    Sambaqui).}
+
+\item{\code{peso}}{Pesos dos mexilhões, em gramas. A variável foi
+    categorizada em três níveis (7-20, 21-33 e 34-46 gramas).}
+
+\item{\code{freq}}{Número de mexilhões no cruzamento de \code{local}
+    com \code{peso}.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.26, pág. 107)
+}
+\description{
+Estudo observacional cujo interesse é verificar se
+    existe associação entre o local de coleta de mexilhões e o peso
+    deles.
+}
+\examples{
+
+data(AndradeTb2.26)
+str(AndradeTb2.26)
+
+xt <- xtabs(freq ~ ., data = AndradeTb2.26)
+xt
+
+mosaicplot(t(xt), col = c("darkturquoise", "lawngreen"),
+           cex.axis = 0.8, las = 2, main = "")
+
+library(lattice)
+barchart(t(xt),
+         horizontal = FALSE,
+         stack = TRUE,
+         auto.key = list(
+             columns = 2,
+             title = "Local de coleta",
+             cex.title = 1.1),
+         xlab = "Peso do mexilhão",
+         ylab = "Número de mexilhões")
+
+}
+\keyword{contingência}
+
diff --git a/man/AndradeTb2.27.Rd b/man/AndradeTb2.27.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..238bd12c77808bd8ccb86775ef7e076dd1330a9f
--- /dev/null
+++ b/man/AndradeTb2.27.Rd
@@ -0,0 +1,58 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.27.R
+\name{AndradeTb2.27}
+\alias{AndradeTb2.27}
+\title{Estudo da Eficiência de uma Vacina Antigripal}
+\format{Um \code{data.frame} com 6 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{saude}}{Estado de saúde dos habitantes (gripados ou não
+    gripados).}
+
+\item{\code{vacina}}{identifica em quantas doses a vacina antigripal
+    foi aplicada (0, não houve aplicação; 1, em dose única; 2, em
+    duas doses).}
+
+\item{\code{freq}}{Número de habitantes no cruzamento de \code{saude}
+    e \code{vacina}.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.27, pág. 108)
+}
+\description{
+Estudo para avaliar a eficiência de uma nova vacina
+    antigripal, a qual foi administrada aos membros de uma pequena
+    comunidade, em duas doses, ao longo de duas semanas. Algumas
+    pessoas tomaram as duas doses, outras tomaram apenas a primeira
+    dose e outras não tomaram nenhuma dose. Os tratamentos foram
+    aplicados em 1000 habitantes dessa comunidade.
+}
+\examples{
+
+data(AndradeTb2.27)
+str(AndradeTb2.27)
+
+xt <- xtabs(freq ~ ., data = AndradeTb2.27)
+xt
+
+mosaicplot(xt, col = c("darkturquoise", "lawngreen", "blue"),
+           cex.axis = 0.8, main = "")
+
+library(lattice)
+barchart(t(xt),
+         horizontal = FALSE,
+         stack = TRUE,
+         auto.key = list(
+             corner= c(0.9, 0.9),
+             title = "Estado de saúde",
+             cex.title = 1.1),
+         xlab = "Número de doses da vacina",
+         ylab = "Número de habitantes")
+
+}
+\keyword{contigência}
+
diff --git a/man/AndradeTb2.28.Rd b/man/AndradeTb2.28.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..37427a75fa6a2726d5b85ffd2fe67b9050c1c4fe
--- /dev/null
+++ b/man/AndradeTb2.28.Rd
@@ -0,0 +1,46 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.28.R
+\name{AndradeTb2.28}
+\alias{AndradeTb2.28}
+\title{Número de Brotos por Explante de Abacaxi}
+\format{Um \code{data.frame} com 26 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{meio}}{Meios de cultura em que os explantes de abacaxi
+    foram mantidos.}
+
+\item{\code{nbroto}}{Número de brotos por explante de abacaxi.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.28, pág. 109)
+}
+\description{
+Número de brotos por explante de abacaxi avaliada em
+    dois meios de cultura.
+}
+\examples{
+
+data(AndradeTb2.28)
+str(AndradeTb2.28)
+
+with(AndradeTb2.28, by(nbroto, meio, summary))
+
+library(lattice)
+
+bwplot(nbroto ~ meio,
+       data = AndradeTb2.28,
+       xlab = "Meio de Cultura",
+       ylab = "Número de Brotos")
+
+densityplot(~nbroto,
+            groups = meio,
+            grid = TRUE,
+            data = AndradeTb2.28)
+
+}
+\keyword{AASI}
+
diff --git a/man/AndradeTb2.29.Rd b/man/AndradeTb2.29.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..32d91f573c3c3bd22cc6a18525d6b2c05e799df4
--- /dev/null
+++ b/man/AndradeTb2.29.Rd
@@ -0,0 +1,36 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.29.R
+\name{AndradeTb2.29}
+\alias{AndradeTb2.29}
+\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
+    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)
+}
+\description{
+Biometria total, em milímetros, do Camarão de água doce
+    \emph{Macrobrachium potiuna} (MÜLLER, 1880), da família
+    \emph{Palaemonidae}.
+}
+\examples{
+
+data(AndradeTb2.29)
+str(AndradeTb2.29)
+
+hist(AndradeTb2.29,
+     labels = TRUE,
+     prob = TRUE,
+     main = NULL,
+     col = "darkturquoise",
+     ylim = c(0, 0.071),
+     xlab = "Biometria Total (em mm)",
+     ylab = "Densidade")
+
+lines(density(AndradeTb2.29), lwd = 2)
+
+}
+\keyword{AAS}
+
diff --git a/man/AndradeTb2.31.Rd b/man/AndradeTb2.31.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..65f82efb12132c95c4211d86f89e811a3087a19e
--- /dev/null
+++ b/man/AndradeTb2.31.Rd
@@ -0,0 +1,43 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.31.R
+\name{AndradeTb2.31}
+\alias{AndradeTb2.31}
+\title{Efeito do Rizóbio na Altura das Plantas}
+\format{Um \code{data.frame} com 40 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{trat}}{Indica o tratamento aplicado às plantas (com
+    rizóbio ou controle).}
+
+\item{\code{altura}}{Altura das plantas, medida em cm.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.31, pág. 111)
+}
+\description{
+Altura de plantas, medida em centímetros, para dois
+    tratamentos, no qual um tratamento é o controle, isto é, não foi
+    feita a inoculação do rizóbio nas plantas e o outro corresponde à
+    aplicação de rizóbio nas plantas (rizóbios tem a capacidade de
+    fixar o nitrogênio atmosférico e fornecê-lo às culturas).
+}
+\examples{
+
+data(AndradeTb2.31)
+str(AndradeTb2.31)
+
+with(AndradeTb2.31, by(altura, trat, summary))
+
+library(lattice)
+bwplot(altura ~ trat,
+       data = AndradeTb2.31,
+       xlab = "Tratamento",
+       ylab = "Altura")
+
+}
+\keyword{AASI}
+