From 9a2fa2f0539476553f9083120885bcb0015446c0 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Thu, 23 Jun 2016 23:22:03 -0300
Subject: [PATCH] Corrige ERRORs e NOTEs no build, dados do Paula.

---
 R/PaulaEg1.12.4.R  | 43 ++++++++++++++++++++++---------------------
 R/PaulaEx1.13.19.R | 36 ++++++++++++++++++------------------
 2 files changed, 40 insertions(+), 39 deletions(-)

diff --git a/R/PaulaEg1.12.4.R b/R/PaulaEg1.12.4.R
index 5813d51a..26be74b3 100644
--- a/R/PaulaEg1.12.4.R
+++ b/R/PaulaEg1.12.4.R
@@ -1,23 +1,23 @@
 #' @name PaulaEg1.12.4
 #' @title Desenvolvimento de Massa Tumoral em Ratos
-#' @description Estudo realizado para avaliar a influência da série 
+#' @description Estudo realizado para avaliar a influência da série
 #'     (passagem do tumor) na morte (caquexia) de certa espécie de rato.
 #'     Um total de 204 animais teve tumor inoculado num determinado
-#'     momento da série. Para cada animal, além do grupo de passagem, 
+#'     momento da série. Para cada animal, além do grupo de passagem,
 #'     foram observadas as variáveis presença de massa tumoral, caquexia
-#'     e o tempo de observação. 
-#'      
+#'     e o tempo de observação.
+#'
 #' @format Um \code{data.frame} com 204 observações e 4 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{grupo}}{Grupo de passagem (0 a 28).}
-#' 
+#'
 #' \item{\code{massat}}{Presença de massa tumoral (sim ou não).}
-#' 
+#'
 #' \item{\code{caq}}{Caquexia (sim ou não).}
-#' 
+#'
 #' \item{\code{tempo}}{Tempo de sobrevivência (em dias).}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -26,26 +26,27 @@
 #' @examples
 #'
 #' data(PaulaEg1.12.4)
-#' 
 #' str(PaulaEg1.12.4)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(tempo ~ grupo | massat,
 #'        groups = caq,
 #'        data = PaulaEg1.12.4,
 #'        type = c("p", "smooth"),
 #'        xlab = "Grupo",
 #'        ylab = "Tempo",
-#'        main = "Tempo de sobrevivência vs grupo de passagem \n (segundo caquexia e presença de massa tumoral)", 
-#'        auto.key = list(space="top", columns=2, 
-#'                        title="Presença de caquexia", cex.title=1,
-#'                        lines=TRUE, points=FALSE))
-#' 
-#' bwplot(tempo ~ massat | caq, 
+#'        main = paste("Tempo de sobrevivência vs grupo de passagem\n",
+#'                     "(segundo caquexia e presença de massa tumoral)"),
+#'        auto.key = list(space = "top", columns = 2,
+#'                        title = "Presença de caquexia", cex.title = 1,
+#'                        lines = TRUE, points = FALSE))
+#'
+#' bwplot(tempo ~ massat | caq,
 #'        data = PaulaEg1.12.4,
 #'        ylab = "Tempo",
-#'        xlab = "Presença de massa tumoral", 
-#'        main = "Bwplot para Caquexia não Presente (à esquerda) ou Presente (à direita)")
+#'        xlab = "Presença de massa tumoral",
+#'        main = paste("Bwplot para Caquexia não Presente\n",
+#'                     "(à esquerda) ou Presente (à direita)"))
 #'
-NULL
\ No newline at end of file
+NULL
diff --git a/R/PaulaEx1.13.19.R b/R/PaulaEx1.13.19.R
index 92510901..404e3832 100644
--- a/R/PaulaEx1.13.19.R
+++ b/R/PaulaEx1.13.19.R
@@ -8,43 +8,43 @@
 #'     informações.
 #' @format Um \code{data.frame} com 50 observações e 9 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{estado}}{Nome do estado.}
-#' 
+#'
 #' \item{\code{pop}}{População estimada em julho de 1975.}
-#' 
+#'
 #' \item{\code{renda}}{Renda per capita em 1974 (em dólares).}
-#' 
+#'
 #' \item{\code{analf}}{Proporção de analfabetos em 1970.}
-#' 
+#'
 #' \item{\code{crime}}{Taxa de criminalidade por cem mil habitantes em
-#'     1976.} 
-#' 
+#'     1976.}
+#'
 #' \item{\code{estud}}{Porcentagem de estudantes que concluem o segundo
 #'     grau em 1970.}
-#' 
+#'
 #' \item{\code{ndias}}{Número de dias do ano com temperatura abaixo de
-#'     0ºC na cidade mais importante do estado.}
-#' 
+#'     0\eqn{^\circ C} na cidade mais importante do estado.}
+#'
 #' \item{\code{area}}{Área do estado (em milhas quadradas).}
-#' 
+#'
 #' \item{\code{expvi}}{Expectativa de vida nos anos de 1969-1970.}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exercício 1.13.19,
 #'     pág. 109)
 #' @examples
+#'
 #' data(PaulaEx1.13.19)
-#' 
 #' str(PaulaEx1.13.19)
-#' 
+#'
 #' library(car)
-#' 
+#'
 #' PaulaEx1.13.19$dens <- PaulaEx1.13.19$pop/PaulaEx1.13.19$area
-#' scatterplotMatrix( ~ expvida + analf + crime + estud + ndias + dens,
-#'                    data = PaulaEx1.13.19)
-#' 
+#' scatterplotMatrix(~expvi + analf + crime + estud + ndias + dens,
+#'                   data = PaulaEx1.13.19)
+#'
 #'
 NULL
-- 
GitLab