diff --git a/R/PaulinoEx8.10.R b/R/PaulinoEx8.10.R
new file mode 100644
index 0000000000000000000000000000000000000000..d087eb97ee364facfbde40b80ea0d46d252d4678
--- /dev/null
+++ b/R/PaulinoEx8.10.R
@@ -0,0 +1,47 @@
+#' @name PaulinoEx8.10
+#' @title Ensaio Clínico de Pacientes com Úlcera Duodenal
+#' @description Ensaio clínico envolvendo pacientes com úlcera duodenal.
+#'     Os pacientes foram aleatoriamente submetidos a um de quatro tipos
+#'     de cirurgia. Três destas operação envolveram vagotomia, diferindo
+#'     entre elas pelo grau de resseção estomacal eventualmente efeuado.
+#'     No primeiro tipo (O1) fez-se apenas uma drenagem enquanto que nas
+#'     outras operações removeu-se ainda 25\% (O2) e 50\% (O3) de tecido
+#'     gástrico. O quarto tipo de operação consistiu apenas de uma
+#'     gastrectomia que removeu 75\% do estômago (O4).
+#' @format Um \code{data.frame} com 48 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{hops}}{Hospital onde foi realizada a cirurgia.}
+#'
+#' \item{\code{proc}}{Procediemnto cirúrgico.}
+#'
+#' \item{\code{iseq}}{Intensidade da sequela. (N) nenhuma sequela, (l)
+#'     ligeira e (M) moderada.}
+#'     
+#' \item{\code{freq}}{Frequência da intensidade.}
+#'
+#' }
+#' @keywords dummy
+#' @source Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+#'     Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+#'     (Exercício 8.10, pág. 243).
+#'
+#'     Grizzle, J. E., Starmer, C. F., Koch, G. G. (1969). Analysis of
+#'     categorical data by linear models, Biometrics 25: 489-504.
+#' @examples
+#' 
+#' data(PaulinoEx8.10)
+#' str(PaulinoEx8.10)
+#' 
+#' library(lattice)
+#'
+#' xyplot(freq ~ proc,
+#'        groups = iseq,
+#'        data = PaulinoEx8.10,
+#'        auto.key = list(space = "top", columns = 3, cex.title = 1,
+#'                        title = "Intensidade da sequela"),
+#'        xlab = "Procedimento cirúrgico",
+#'        ylab = "Frquência da intensidade")
+#'
+NULL
\ No newline at end of file
diff --git a/R/PaulinoEx8.11a.R b/R/PaulinoEx8.11a.R
new file mode 100644
index 0000000000000000000000000000000000000000..ad440aa2b9f3e4749abdb9cee63196040feffd95
--- /dev/null
+++ b/R/PaulinoEx8.11a.R
@@ -0,0 +1,44 @@
+#' @name PaulinoEx8.11a
+#' @title Comportamento Predatório da Jararaca
+#' @description Estudo envolvendo o comportamento predatório em
+#'     cativeiro da jararaca (uma das serpentes mais venenosas do
+#'     Brasil). Objetivo do exercício é analisar os dados estudando o
+#'     efeito das características das presas na proporção teória de
+#'     botes predatórios.
+#' @format Um \code{data.frame} com 8 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{pigm}}{Pigmentação da serpente (escura, albina).}
+#'
+#' \item{\code{peso}}{Peso relativo da serpente (menor, maior).}
+#'
+#' \item{\code{bote}}{Bote predatório (sim, não).}
+#'     
+#' \item{\code{freq}}{Frequência observada.}
+#'
+#' }
+#' @keywords contingência binomial
+#' @source Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+#'     Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+#'     (Exercício 8.11 a, pág. 244).
+#' @examples
+#' 
+#' str(PaulinoEx8.11a)
+#' 
+#' xt <- xtabs(freq ~ pigm + peso + bote, data = PaulinoEx8.11a)
+#' xt
+#'
+#' library(lattice)
+#'
+#' barchart(xt,
+#'          horizontal = FALSE,
+#'          beside = FALSE,
+#'          stack = FALSE,
+#'          auto.key = list(space = "top", columns = 2,
+#'                          cex.title = 1, rectangles = TRUE,
+#'                          points = FALSE, title = "Bote predatório"),
+#'          xlab = "Pigmentação",
+#'          ylab = "Frequência")
+#'
+NULL
\ No newline at end of file
diff --git a/R/PaulinoEx8.11b.R b/R/PaulinoEx8.11b.R
new file mode 100644
index 0000000000000000000000000000000000000000..dde7d8e8cf3c4fefeecef2d3f5557f3b284cd42f
--- /dev/null
+++ b/R/PaulinoEx8.11b.R
@@ -0,0 +1,34 @@
+#' @name PaulinoEx8.11b
+#' @title Comportamento Predatório da Jararaca
+#' @description Estudo envolvendo o comportamento predatório em
+#'     cativeiro da jararaca (uma das serpentes mais venenosas do
+#'     Brasil). Objetivo do exercício é analisar os dados..
+#' @format Um \code{data.frame} com 4 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{presa1}}{Tipo de bote na primeira presa (envenenamento,
+#'     apreensão).}
+#'
+#' \item{\code{presa2}}{Tipo de bote na segunda presa (envenenamento,
+#'     apreensão).}
+#'     
+#' \item{\code{freq}}{Frequência observada.}
+#'
+#' }
+#' @keywords contingência
+#' @source Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+#'     Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+#'     (Exercício 8.11 b, pág. 244).
+#' @examples
+#' 
+#' str(PaulinoEx8.11b)
+#' 
+#' xt <- xtabs(freq ~ presa1 + presa2, data = PaulinoEx8.11b)
+#' xt
+#'
+#' mosaicplot(xt, main = NULL,
+#'            xlab = "Tipo de bote na primeira presa",
+#'            ylab = "Tipo de bote na segunda presa")
+#'
+NULL
\ No newline at end of file
diff --git a/R/PaulinoEx8.12.R b/R/PaulinoEx8.12.R
new file mode 100644
index 0000000000000000000000000000000000000000..ee0759cda068483d78ceb6cea763011d20999f66
--- /dev/null
+++ b/R/PaulinoEx8.12.R
@@ -0,0 +1,44 @@
+#' @name PaulinoEx8.12
+#' @title Obesidade em Crianças Observada em Três Anos
+#' @description Dados de um estudo envolvendo um conjunto de 10 grupos
+#'     de crianças, definidos pelo sexo e faixa atária em 1977, que
+#'     foram observadas em três ocasiões (1977, 1979, 1981)
+#'     relativamente à existência (O) ou não (N) de obesidade,
+#'     determinada por uma medida apropriada de peso relativo. 
+#' @format Um \code{data.frame} com 80 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{sexo}}{Sexo da criança envolvida no estudo. Feminino (f),
+#'     masculino (m).}
+#'
+#' \item{\code{faixa}}{Faixa etária da criança, em 5 categorias.}
+#'     
+#' \item{\code{categ}}{Categorias de resposta.}
+#' 
+#' \item{\code{nobes}}{Número de crianças na categoria.}
+#'
+#' }
+#' @keywords RP dummy
+#' @source Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+#'     Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+#'     (Exercício 8.12, pág. 244).
+#' @examples
+#' 
+#' str(PaulinoEx8.12)
+#' 
+#' library(lattice)
+#' library(latticeExtra)
+#'
+#' useOuterStrips(
+#'     barchart(nobes ~ categ | sexo + faixa, data = PaulinoEx8.12,
+#'              ylim = c(0, 170),
+#'              panel = function(...) {
+#'                  args <- list(...)
+#'                  panel.text(args$x, args$y, args$y,
+#'                             pos = 3, offset = 0, cex = 0.8)
+#'                  panel.barchart(...)
+#'              })
+#' )
+#'
+NULL
\ No newline at end of file
diff --git a/R/PaulinoTb6.1.R b/R/PaulinoTb6.1.R
new file mode 100644
index 0000000000000000000000000000000000000000..2f909ab41ccecd024b4d7da93474f03b4551f047
--- /dev/null
+++ b/R/PaulinoTb6.1.R
@@ -0,0 +1,31 @@
+#' @name PaulinoTb6.1
+#' @title Morte por Intoxicação de Besouros
+#' @description Experimento envolvendo a exposição de besouros durante
+#'     cinco horas a uma gás tóxico em oito níveis de concentração
+#'     representada pelo logaritmo da dose (medida habitual neste tipo
+#'     de estudo).
+#' @format Um \code{data.frame} com 8 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{dose}}{Logaritmo da dose de gás tóxico.}
+#'
+#' \item{\code{morte}}{Número de besouros mortos.}
+#'
+#' \item{\code{besexp}}{Número de besouros expostos ao gás tóxico.}
+#'
+#' }
+#' @keywords binomial
+#' @source Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+#'     Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+#'     (Tabela 6.1, pág. 150).
+#' @examples
+#' 
+#' data(PaulinoTb6.1)
+#' str(PaulinoTb6.1)
+#'
+#' library(lattice)
+#'
+#' xyplot(morte/besexp ~ dose, data = PaulinoTb6.1)
+#'
+NULL
\ No newline at end of file
diff --git a/R/PaulinoTb6.2.R b/R/PaulinoTb6.2.R
new file mode 100644
index 0000000000000000000000000000000000000000..da9df023ea24c60edce3d9ee6dc29d6e662b25f8
--- /dev/null
+++ b/R/PaulinoTb6.2.R
@@ -0,0 +1,49 @@
+#' @name PaulinoTb6.2
+#' @title Pacientes com Complicação Pulmonar 
+#' @description Estudo envolvendo a avaliação pulmonar pré-operatória de
+#'     1162 pacientes e a ocorrência de complicação pulmonar no
+#'     pós-operatório de cirurgia geral. 
+#' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{preop}}{Avaliação pré-operatória do grau de complicação
+#'     pulmonar.}
+#'
+#' \item{\code{posop}}{Avalição pulmonar pós-operatória (sem ou com
+#'     complicação).}
+#'
+#' \item{\code{npaci}}{Número de pacientes.}
+#'
+#' }
+#' @keywords binomial contingência
+#' @source Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+#'     Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+#'     (Tabela 6.2, pág. 150).
+#'
+#'     Barros, J. A. (1994). Avaliação pulmonar pré-operatória em
+#'     candidatos a cirurgia geral eletiva, Dissertação de mestrado,
+#'     Escola Paulista de Medicina, Universidade Federal de São Paulo.
+#' @examples
+#'
+#' xt <- xtabs(npaci ~ preop + posop, data = PaulinoTb6.2)
+#' xt
+#'
+#' mosaicplot(xt, main = NULL,
+#'            xlab = "Avaliação pré-operatória",
+#'            ylab = "Avaliação pós-operatória")
+#'
+#' library(lattice)
+#' 
+#' barchart(xt,
+#'          horizontal = FALSE,
+#'          beside = FALSE,
+#'          stack = FALSE,
+#'          auto.key = list(space = "top", columns = 2,
+#'                          cex.title = 1, rectangles = TRUE,
+#'                          points = FALSE,
+#'                          title = "Avaliação pós-operatória"),
+#'          xlab = "Avaliação pré-operatória",
+#'          ylab = "Frequência")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/PaulinoEx8.10.txt b/data-raw/PaulinoEx8.10.txt
new file mode 100644
index 0000000000000000000000000000000000000000..c0b539905a3e6c2bdc2d27dcc76889cc0f2e558a
--- /dev/null
+++ b/data-raw/PaulinoEx8.10.txt
@@ -0,0 +1,49 @@
+hosp	proc	iseq	freq
+1	O1	n	23
+1	O1	l	7
+1	O1	m	2
+1	O2	n	23
+1	O2	l	10
+1	O2	m	5
+1	O3	n	20
+1	O3	l	13
+1	O3	m	5
+1	O4	n	24
+1	O4	l	10
+1	O4	m	6
+2	O1	n	6
+2	O1	l	1
+2	O1	m	18
+2	O2	n	18
+2	O2	l	6
+2	O2	m	2
+2	O3	n	13
+2	O3	l	13
+2	O3	m	2
+2	O4	n	9
+2	O4	l	15
+2	O4	m	2
+3	O1	n	8
+3	O1	l	6
+3	O1	m	3
+3	O2	n	12
+3	O2	l	4
+3	O2	m	4
+3	O3	n	11
+3	O3	l	6
+3	O3	m	2
+3	O4	n	7
+3	O4	l	7
+3	O4	m	4
+4	O1	n	12
+4	O1	l	9
+4	O1	m	1
+4	O2	n	15
+4	O2	l	3
+4	O2	m	2
+4	O3	n	14
+4	O3	l	8
+4	O3	m	3
+4	O4	n	13
+4	O4	l	6
+4	O4	m	4
diff --git a/data-raw/PaulinoEx8.11a.txt b/data-raw/PaulinoEx8.11a.txt
new file mode 100644
index 0000000000000000000000000000000000000000..04f811e0bc4e17a22733c4f9a878abe8631607c6
--- /dev/null
+++ b/data-raw/PaulinoEx8.11a.txt
@@ -0,0 +1,9 @@
+pigm	peso	bote	freq
+escura	menor	sim	6
+escura	menor	nao	3
+escura	maior	sim	6
+escura	maior	nao	4
+albina	menor	sim	5
+albina	menor	nao	7
+albina	maior	sim	17
+albina	maior	nao	4
diff --git a/data-raw/PaulinoEx8.11b.txt b/data-raw/PaulinoEx8.11b.txt
new file mode 100644
index 0000000000000000000000000000000000000000..3472bec1b2ea16d58cd55536bb9cc1d6cd08fa8e
--- /dev/null
+++ b/data-raw/PaulinoEx8.11b.txt
@@ -0,0 +1,5 @@
+presa1	presa2	freq
+envenenamento	envenenamento	8
+envenenamento	apreensao	10
+apreensao	envenenamento	0
+apreensao	apreensao	11
diff --git a/data-raw/PaulinoEx8.12.txt b/data-raw/PaulinoEx8.12.txt
new file mode 100644
index 0000000000000000000000000000000000000000..71cb64b62493b8375e419f68e18fc50a368d400d
--- /dev/null
+++ b/data-raw/PaulinoEx8.12.txt
@@ -0,0 +1,81 @@
+sexo	faixa	categ	nobes
+m	5-7	nnn	90
+m	7-9	nnn	150
+m	9-11	nnn	152
+m	11-13	nnn	119
+m	13-15	nnn	101
+f	5-7	nnn	75
+f	7-9	nnn	154
+f	9-11	nnn	148
+f	11-13	nnn	129
+f	13-15	nnn	91
+m	5-7	nno	9
+m	7-9	nno	15
+m	9-11	nno	11
+m	11-13	nno	7
+m	13-15	nno	4
+f	5-7	nno	8
+f	7-9	nno	14
+f	9-11	nno	6
+f	11-13	nno	8
+f	13-15	nno	9
+m	5-7	non	3
+m	7-9	non	8
+m	9-11	non	8
+m	11-13	non	8
+m	13-15	non	2
+f	5-7	non	2
+f	7-9	non	13
+f	9-11	non	10
+f	11-13	non	7
+f	13-15	non	5
+m	5-7	noo	7
+m	7-9	noo	8
+m	9-11	noo	10
+m	11-13	noo	3
+m	13-15	noo	7
+f	5-7	noo	4
+f	7-9	noo	19
+f	9-11	noo	8
+f	11-13	noo	9
+f	13-15	noo	3
+m	5-7	onn	0
+m	7-9	onn	8
+m	9-11	onn	7
+m	11-13	onn	13
+m	13-15	onn	8
+f	5-7	onn	2
+f	7-9	onn	2
+f	9-11	onn	12
+f	11-13	onn	6
+f	13-15	onn	6
+m	5-7	ono	1
+m	7-9	ono	9
+m	9-11	ono	7
+m	11-13	ono	4
+m	13-15	ono	0
+f	5-7	ono	2
+f	7-9	ono	6
+f	9-11	ono	0
+f	11-13	ono	2
+f	13-15	ono	0
+m	5-7	oon	1
+m	7-9	oon	7
+m	9-11	oon	9
+m	11-13	oon	11
+m	13-15	oon	6
+f	5-7	oon	1
+f	7-9	oon	6
+f	9-11	oon	8
+f	11-13	oon	7
+f	13-15	oon	6
+m	5-7	ooo	8
+m	7-9	ooo	20
+m	9-11	ooo	25
+m	11-13	ooo	16
+m	13-15	ooo	15
+f	5-7	ooo	8
+f	7-9	ooo	21
+f	9-11	ooo	27
+f	11-13	ooo	14
+f	13-15	ooo	15
diff --git a/data-raw/PaulinoTb6.1.txt b/data-raw/PaulinoTb6.1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..bc432850e5081355f69298fe84662fa04b8646be
--- /dev/null
+++ b/data-raw/PaulinoTb6.1.txt
@@ -0,0 +1,9 @@
+dose	morte	besexp
+1.6907	6	59
+1.7242	13	60
+1.7552	18	62
+1.7842	28	56
+1.8113	52	63
+1.8369	53	59
+1.8610	61	62
+1.8839	60	60
diff --git a/data-raw/PaulinoTb6.2.txt b/data-raw/PaulinoTb6.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..4946158b7a7a65c4bc38138b36c4ab9a87bc697d
--- /dev/null
+++ b/data-raw/PaulinoTb6.2.txt
@@ -0,0 +1,7 @@
+preop	posop	npaci
+baixo	sem	737
+baixo	com	48
+moderado	sem	243
+moderado	com	74
+alto	sem	39
+alto	com	21
diff --git a/data/PaulinoEx8.10.rda b/data/PaulinoEx8.10.rda
new file mode 100644
index 0000000000000000000000000000000000000000..81853eb08f0ec9b364d58d66d236f969b99b2867
Binary files /dev/null and b/data/PaulinoEx8.10.rda differ
diff --git a/data/PaulinoEx8.11a.rda b/data/PaulinoEx8.11a.rda
new file mode 100644
index 0000000000000000000000000000000000000000..5d5d80c957881430d4e93aac298feb6d7262522c
Binary files /dev/null and b/data/PaulinoEx8.11a.rda differ
diff --git a/data/PaulinoEx8.11b.rda b/data/PaulinoEx8.11b.rda
new file mode 100644
index 0000000000000000000000000000000000000000..be7851f18d59cad03209f3e9dd6ac324be981463
Binary files /dev/null and b/data/PaulinoEx8.11b.rda differ
diff --git a/data/PaulinoEx8.12.rda b/data/PaulinoEx8.12.rda
new file mode 100644
index 0000000000000000000000000000000000000000..e7f1fb4a88e605ca43532d22ec72fcaef81c0635
Binary files /dev/null and b/data/PaulinoEx8.12.rda differ
diff --git a/data/PaulinoTb6.1.rda b/data/PaulinoTb6.1.rda
new file mode 100644
index 0000000000000000000000000000000000000000..bca562f939409b17a1e93ce3a5f34a5c471513a2
Binary files /dev/null and b/data/PaulinoTb6.1.rda differ
diff --git a/data/PaulinoTb6.2.rda b/data/PaulinoTb6.2.rda
new file mode 100644
index 0000000000000000000000000000000000000000..0884e14c81e5583f667f317c3600275138e0d1b0
Binary files /dev/null and b/data/PaulinoTb6.2.rda differ
diff --git a/man/PaulinoEx8.10.Rd b/man/PaulinoEx8.10.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..77a33576c7d32cc2d9ce53bd233ffe80db531d11
--- /dev/null
+++ b/man/PaulinoEx8.10.Rd
@@ -0,0 +1,55 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoEx8.10.R
+\name{PaulinoEx8.10}
+\alias{PaulinoEx8.10}
+\title{Ensaio Clínico de Pacientes com Úlcera Duodenal}
+\format{Um \code{data.frame} com 48 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{hops}}{Hospital onde foi realizada a cirurgia.}
+
+\item{\code{proc}}{Procediemnto cirúrgico.}
+
+\item{\code{iseq}}{Intensidade da sequela. (N) nenhuma sequela, (l)
+    ligeira e (M) moderada.}
+    
+\item{\code{freq}}{Frequência da intensidade.}
+
+}}
+\source{
+Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+    Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+    (Exercício 8.10, pág. 243).
+
+    Grizzle, J. E., Starmer, C. F., Koch, G. G. (1969). Analysis of
+    categorical data by linear models, Biometrics 25: 489-504.
+}
+\description{
+Ensaio clínico envolvendo pacientes com úlcera duodenal.
+    Os pacientes foram aleatoriamente submetidos a um de quatro tipos
+    de cirurgia. Três destas operação envolveram vagotomia, diferindo
+    entre elas pelo grau de resseção estomacal eventualmente efeuado.
+    No primeiro tipo (O1) fez-se apenas uma drenagem enquanto que nas
+    outras operações removeu-se ainda 25\% (O2) e 50\% (O3) de tecido
+    gástrico. O quarto tipo de operação consistiu apenas de uma
+    gastrectomia que removeu 75\% do estômago (O4).
+}
+\examples{
+
+data(PaulinoEx8.10)
+str(PaulinoEx8.10)
+
+library(lattice)
+
+xyplot(freq ~ proc,
+       groups = iseq,
+       data = PaulinoEx8.10,
+       auto.key = list(space = "top", columns = 3, cex.title = 1,
+                       title = "Intensidade da sequela"),
+       xlab = "Procedimento cirúrgico",
+       ylab = "Frquência da intensidade")
+
+}
+\keyword{dummy}
+
diff --git a/man/PaulinoEx8.11a.Rd b/man/PaulinoEx8.11a.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..e2f186778de498940d55b49f1cbb8322246c1ab9
--- /dev/null
+++ b/man/PaulinoEx8.11a.Rd
@@ -0,0 +1,53 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoEx8.11a.R
+\name{PaulinoEx8.11a}
+\alias{PaulinoEx8.11a}
+\title{Comportamento Predatório da Jararaca}
+\format{Um \code{data.frame} com 8 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{pigm}}{Pigmentação da serpente (escura, albina).}
+
+\item{\code{peso}}{Peso relativo da serpente (menor, maior).}
+
+\item{\code{bote}}{Bote predatório (sim, não).}
+    
+\item{\code{freq}}{Frequência observada.}
+
+}}
+\source{
+Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+    Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+    (Exercício 8.11 a, pág. 244).
+}
+\description{
+Estudo envolvendo o comportamento predatório em
+    cativeiro da jararaca (uma das serpentes mais venenosas do
+    Brasil). Objetivo do exercício é analisar os dados estudando o
+    efeito das características das presas na proporção teória de
+    botes predatórios.
+}
+\examples{
+
+str(PaulinoEx8.11a)
+
+xt <- xtabs(freq ~ pigm + peso + bote, data = PaulinoEx8.11a)
+xt
+
+library(lattice)
+
+barchart(xt,
+         horizontal = FALSE,
+         beside = FALSE,
+         stack = FALSE,
+         auto.key = list(space = "top", columns = 2,
+                         cex.title = 1, rectangles = TRUE,
+                         points = FALSE, title = "Bote predatório"),
+         xlab = "Pigmentação",
+         ylab = "Frequência")
+
+}
+\keyword{binomial}
+\keyword{contingência}
+
diff --git a/man/PaulinoEx8.11b.Rd b/man/PaulinoEx8.11b.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..1eec0e33d56f24e95b38d5d3583dfe467156c668
--- /dev/null
+++ b/man/PaulinoEx8.11b.Rd
@@ -0,0 +1,42 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoEx8.11b.R
+\name{PaulinoEx8.11b}
+\alias{PaulinoEx8.11b}
+\title{Comportamento Predatório da Jararaca}
+\format{Um \code{data.frame} com 4 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{presa1}}{Tipo de bote na primeira presa (envenenamento,
+    apreensão).}
+
+\item{\code{presa2}}{Tipo de bote na segunda presa (envenenamento,
+    apreensão).}
+    
+\item{\code{freq}}{Frequência observada.}
+
+}}
+\source{
+Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+    Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+    (Exercício 8.11 b, pág. 244).
+}
+\description{
+Estudo envolvendo o comportamento predatório em
+    cativeiro da jararaca (uma das serpentes mais venenosas do
+    Brasil). Objetivo do exercício é analisar os dados..
+}
+\examples{
+
+str(PaulinoEx8.11b)
+
+xt <- xtabs(freq ~ presa1 + presa2, data = PaulinoEx8.11b)
+xt
+
+mosaicplot(xt, main = NULL,
+           xlab = "Tipo de bote na primeira presa",
+           ylab = "Tipo de bote na segunda presa")
+
+}
+\keyword{contingência}
+
diff --git a/man/PaulinoEx8.12.Rd b/man/PaulinoEx8.12.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..fd05b9ee95e6724da976f34d238abae9fb58a016
--- /dev/null
+++ b/man/PaulinoEx8.12.Rd
@@ -0,0 +1,53 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoEx8.12.R
+\name{PaulinoEx8.12}
+\alias{PaulinoEx8.12}
+\title{Obesidade em Crianças Observada em Três Anos}
+\format{Um \code{data.frame} com 80 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{sexo}}{Sexo da criança envolvida no estudo. Feminino (f),
+    masculino (m).}
+
+\item{\code{faixa}}{Faixa etária da criança, em 5 categorias.}
+    
+\item{\code{categ}}{Categorias de resposta.}
+
+\item{\code{nobes}}{Número de crianças na categoria.}
+
+}}
+\source{
+Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+    Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+    (Exercício 8.12, pág. 244).
+}
+\description{
+Dados de um estudo envolvendo um conjunto de 10 grupos
+    de crianças, definidos pelo sexo e faixa atária em 1977, que
+    foram observadas em três ocasiões (1977, 1979, 1981)
+    relativamente à existência (O) ou não (N) de obesidade,
+    determinada por uma medida apropriada de peso relativo.
+}
+\examples{
+
+str(PaulinoEx8.12)
+
+library(lattice)
+library(latticeExtra)
+
+useOuterStrips(
+    barchart(nobes ~ categ | sexo + faixa, data = PaulinoEx8.12,
+             ylim = c(0, 170),
+             panel = function(...) {
+                 args <- list(...)
+                 panel.text(args$x, args$y, args$y,
+                            pos = 3, offset = 0, cex = 0.8)
+                 panel.barchart(...)
+             })
+)
+
+}
+\keyword{RP}
+\keyword{dummy}
+
diff --git a/man/PaulinoTb6.1.Rd b/man/PaulinoTb6.1.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..155bcca8cb2fb5ad94170eb9a8fe69fc60b08a8d
--- /dev/null
+++ b/man/PaulinoTb6.1.Rd
@@ -0,0 +1,39 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoTb6.1.R
+\name{PaulinoTb6.1}
+\alias{PaulinoTb6.1}
+\title{Morte por Intoxicação de Besouros}
+\format{Um \code{data.frame} com 8 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{dose}}{Logaritmo da dose de gás tóxico.}
+
+\item{\code{morte}}{Número de besouros mortos.}
+
+\item{\code{besexp}}{Número de besouros expostos ao gás tóxico.}
+
+}}
+\source{
+Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+    Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+    (Tabela 6.1, pág. 150).
+}
+\description{
+Experimento envolvendo a exposição de besouros durante
+    cinco horas a uma gás tóxico em oito níveis de concentração
+    representada pelo logaritmo da dose (medida habitual neste tipo
+    de estudo).
+}
+\examples{
+
+data(PaulinoTb6.1)
+str(PaulinoTb6.1)
+
+library(lattice)
+
+xyplot(morte/besexp ~ dose, data = PaulinoTb6.1)
+
+}
+\keyword{binomial}
+
diff --git a/man/PaulinoTb6.2.Rd b/man/PaulinoTb6.2.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..205f74f227b5b69ef16beda3a6ee64f1c8771685
--- /dev/null
+++ b/man/PaulinoTb6.2.Rd
@@ -0,0 +1,58 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoTb6.2.R
+\name{PaulinoTb6.2}
+\alias{PaulinoTb6.2}
+\title{Pacientes com Complicação Pulmonar}
+\format{Um \code{data.frame} com 6 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{preop}}{Avaliação pré-operatória do grau de complicação
+    pulmonar.}
+
+\item{\code{posop}}{Avalição pulmonar pós-operatória (sem ou com
+    complicação).}
+
+\item{\code{npaci}}{Número de pacientes.}
+
+}}
+\source{
+Paulino, C. D., Singer, J. M. (2006). Análise de Dados 
+    Categorizados (1st ed.). São Paulo, SP: Edgard Blucher.
+    (Tabela 6.2, pág. 150).
+
+    Barros, J. A. (1994). Avaliação pulmonar pré-operatória em
+    candidatos a cirurgia geral eletiva, Dissertação de mestrado,
+    Escola Paulista de Medicina, Universidade Federal de São Paulo.
+}
+\description{
+Estudo envolvendo a avaliação pulmonar pré-operatória de
+    1162 pacientes e a ocorrência de complicação pulmonar no
+    pós-operatório de cirurgia geral.
+}
+\examples{
+
+xt <- xtabs(npaci ~ preop + posop, data = PaulinoTb6.2)
+xt
+
+mosaicplot(xt, main = NULL,
+           xlab = "Avaliação pré-operatória",
+           ylab = "Avaliação pós-operatória")
+
+library(lattice)
+
+barchart(xt,
+         horizontal = FALSE,
+         beside = FALSE,
+         stack = FALSE,
+         auto.key = list(space = "top", columns = 2,
+                         cex.title = 1, rectangles = TRUE,
+                         points = FALSE,
+                         title = "Avaliação pós-operatória"),
+         xlab = "Avaliação pré-operatória",
+         ylab = "Frequência")
+
+}
+\keyword{binomial}
+\keyword{contingência}
+