diff --git a/R/SchwaabEx3.3.R b/R/SchwaabEx3.3.R
index eea1229e8f5df2d63dfaa24d069fff4f6c9a0fb6..bf696c21c501b895558e3e0619f1cb8c348e964c 100644
--- a/R/SchwaabEx3.3.R
+++ b/R/SchwaabEx3.3.R
@@ -1,30 +1,33 @@
 #' @name SchwaabEx3.3
-#' @title Avaliação de Operadores numa Empresa Quimica
-#' @description Quatro turmas de operadores devem ser avaliados em
+#' @title Avaliação de Operadores numa Empresa Química
+#' @description Estudo que avaliou operadores de quatro turmas em
 #'     relação ao desempenho na operação de um reator.
 #' @format Um \code{data.frame} com 80 observações e 2 variáveis, em que
 #'
 #' \describe{
 #'
-#' \item{\code{turma}}{Fator de 4 níveis qualitativos, que são as
-#'     turmas avaliadas.}
+#' \item{\code{turma}}{Fator de 4 níveis que representa a turma do
+#'     operador avaliado.}
 #'
-#' \item{\code{dados}}{Fator numérico que representa os valores dos
-#'     dados de conversão do reator.}
+#' \item{\code{desemp}}{Escore de desempenho do avaliador na operação do
+#'     reator.}
 #'
 #' }
-#' @keywords DBC
-#' @source Schwaab, M., Pinto, J. C.(2007). Análise de Dados
+#' @keywords AASI
+#' @source Schwaab, M., Pinto, J. C.(2007) . Análise de Dados
 #'     Experimentais I. Rio de Janeiro, RJ. COPPE UFRJ e-papers.
 #' @examples
 #'
 #' data(SchwaabEx3.3)
 #' str(SchwaabEx3.3)
 #'
+#' meds <- with(SchwaabEx3.3, tapply(desemp, turma, summary))
+#' do.call(cbind, meds)
+#'
 #' library(lattice)
-#' bwplot(dados ~ turma,
-#'        data =SchwaabEx3.3 ,
-#'        ylab = "Dados de conversão no reator",
-#'        xlab = "Turmas")
+#' bwplot(desemp ~ turma,
+#'        data = SchwaabEx3.3,
+#'        ylab = "Desempenho do operador",
+#'        xlab = "Turma")
 #'
-NULL    
\ No newline at end of file
+NULL
diff --git a/data-raw/SchwaabEx3.3.txt b/data-raw/SchwaabEx3.3.txt
index a47b8963924c2e25e766d4a2a2594d78f451529e..c6907246c7fc2fc2471e101d027db608362b4bdc 100644
--- a/data-raw/SchwaabEx3.3.txt
+++ b/data-raw/SchwaabEx3.3.txt
@@ -1,81 +1,81 @@
-turma	dados
-t1	0.892
-t1	0.910
-t1	0.880
-t1	0.900
-t1	0.920
-t1	0.905
-t1	0.860
-t1	0.920
-t1	0.904
-t1	0.930
-t1	0.921
-t1	0.872
-t1	0.897
-t1	0.880
-t1	0.911
-t1	0.908
-t1	0.915
-t1	0.882
-t1	0.920
-t1	0.900
-t2	0.850
-t2	0.875
-t2	0.880
-t2	0.842
-t2	0.900
-t2	0.910
-t2	0.891
-t2	0.905
-t2	0.870
-t2	0.865
-t2	0.880
-t2	0.891
-t2	0.832
-t2	0.886
-t2	0.872
-t2	0.907
-t2	0.652
-t2	0.871
-t2	0.915
-t2	0.870
-t3	0.775
-t3	0.872
-t3	0.650
-t3	0.881
-t3	0.910
-t3	0.720
-t3	0.851
-t3	0.820
-t3	0.730
-t3	0.780
-t3	0.792
-t3	0.751
-t3	0.891
-t3	0.950
-t3	0.971
-t3	0.918
-t3	0.863
-t3	0.721
-t3	0.753
-t3	0.828
-t4	0.915
-t4	0.921
-t4	0.917
-t4	0.911
-t4	0.907
-t4	0.899
-t4	0.912
-t4	0.910
-t4	0.907
-t4	0.913
-t4	0.905
-t4	0.898
-t4	0.902
-t4	0.911
-t4	0.907
-t4	0.906
-t4	0.913
-t4	0.908
-t4	0.906
-t4	0.909
+turma	desemp
+t1	0.892
+t1	0.91
+t1	0.88
+t1	0.9
+t1	0.92
+t1	0.905
+t1	0.86
+t1	0.92
+t1	0.904
+t1	0.93
+t1	0.921
+t1	0.872
+t1	0.897
+t1	0.88
+t1	0.911
+t1	0.908
+t1	0.915
+t1	0.882
+t1	0.92
+t1	0.9
+t2	0.85
+t2	0.875
+t2	0.88
+t2	0.842
+t2	0.9
+t2	0.91
+t2	0.891
+t2	0.905
+t2	0.87
+t2	0.865
+t2	0.88
+t2	0.891
+t2	0.832
+t2	0.886
+t2	0.872
+t2	0.907
+t2	0.652
+t2	0.871
+t2	0.915
+t2	0.87
+t3	0.775
+t3	0.872
+t3	0.65
+t3	0.881
+t3	0.91
+t3	0.72
+t3	0.851
+t3	0.82
+t3	0.73
+t3	0.78
+t3	0.792
+t3	0.751
+t3	0.891
+t3	0.95
+t3	0.971
+t3	0.918
+t3	0.863
+t3	0.721
+t3	0.753
+t3	0.828
+t4	0.915
+t4	0.921
+t4	0.917
+t4	0.911
+t4	0.907
+t4	0.899
+t4	0.912
+t4	0.91
+t4	0.907
+t4	0.913
+t4	0.905
+t4	0.898
+t4	0.902
+t4	0.911
+t4	0.907
+t4	0.906
+t4	0.913
+t4	0.908
+t4	0.906
+t4	0.909
diff --git a/data/SchwaabEx3.3.rda b/data/SchwaabEx3.3.rda
index 5b2edad34cfe95e0d3859b751f4468a0c8ae9f4f..1c53c989eae7fe6812d028a13317c244a2024cbb 100644
Binary files a/data/SchwaabEx3.3.rda and b/data/SchwaabEx3.3.rda differ