Atualiza a documentação.

R/SliwianyQd25.R

@@ -42,5 +42,4 @@
 #'        scales = list(x = list(rot = 90),
 #'                      y = list(relation = "free")))
 #'
-#'
 NULL

R/SliwianyQd26.R

-# Maria, talvez o mais correto para essa tabela é inveter linha com
-# coluna. Ou seja, nas linhas os bairros, nas colunas as
-# habilidades. Você chamar as variáveis genericamente de x1, x2, x3,
-# etc.
-
 #' @name SliwianyQd26
 #' @title Níveis de Satisfação Alcançados nos Medidores dos Subgrupos da
 #'     Ação Educativa
@@ -49,6 +44,4 @@
 #'                      "nos Medidores de Ação Educativa (%)"),
 #'         ylim = c(0, 60))
 #'
-#' 
-#'
 NULL

R/SliwianyQd27.R

-# Maria, aplica-se a esse conjunto de dados as mesmas recomendações
-# indicadas nos outros. Lembre-se: 1) você tem que indentar o código e a
-# documentação, 2) deve terminar as definições na lista \item{}{.} com
-# ponto no final da frase, 3) deve usar a referência bibliográfica
-# curta, 4) sempre onde for "%" escrever "\%".
-
 #' @name SliwianyQd27
 #' @title Níveis de Satisfação Alcançados nos Medidores dos Subgrupos da
 #'     Ação Educativa (\%)
@@ -42,6 +36,8 @@
 #' @source SLIWIANY (1997), Quadro 27, pág. 130.
 #' @examples
 #'
+#' SliwianyQd27
+#'
 #' dados <- SliwianyQd27[, 9]
 #' barplot(dados, names.arg = SliwianyQd27$Jardim.II,
 #'         col = colorspace::rainbow_hcl(9),

R/SliwianyTb7.R

@@ -15,6 +15,8 @@
 #' @source SLIWIANY (1997), Tabela 7, pág. 76.
 #' @examples
 #'
+#' SliwianyTb7
+#'
 #' dados <- SliwianyTb7$ND[1:9]
 #' prop <- (dados/991000) * 100
 #' num <- SliwianyTb7$P.D[1:9]

man/SliwianyQd25.Rd

@@ -48,7 +48,6 @@ xyplot(values ~ ind | Regional, data = db, type = "o",
        scales = list(x = list(rot = 90),
                      y = list(relation = "free")))
 
-
 }
 \keyword{sociometria}
 

man/SliwianyQd26.Rd

@@ -50,8 +50,6 @@ barplot(dados, names.arg = SliwianyQd26$Jardim.I,
                      "nos Medidores de Ação Educativa (\%)"),
         ylim = c(0, 60))
 
-
-
 }
 \keyword{sociometria}
 

man/SliwianyQd27.Rd

@@ -42,6 +42,8 @@ Níveis de satisfação alcançados por crianças do Jardim
 }
 \examples{
 
+SliwianyQd27
+
 dados <- SliwianyQd27[, 9]
 barplot(dados, names.arg = SliwianyQd27$Jardim.II,
         col = colorspace::rainbow_hcl(9),

man/SliwianyTb7.Rd

@@ -21,6 +21,8 @@ Medidor representante densidade domiciliar, para a zona
 }
 \examples{
 
+SliwianyTb7
+
 dados <- SliwianyTb7$ND[1:9]
 prop <- (dados/991000) * 100
 num <- SliwianyTb7$P.D[1:9]