From 0c0038a74fa301b75d23528b1bb83f708115b258 Mon Sep 17 00:00:00 2001
From: Maria <mariaholiveira34@gmail.com>
Date: Mon, 29 Aug 2016 21:12:11 -0300
Subject: [PATCH] adiciona exemplos para as tabelas 2 e 4

---
 R/SliwianyTb2.R | 7 +++++++
 R/SliwianyTb4.R | 9 ++++++++-
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/R/SliwianyTb2.R b/R/SliwianyTb2.R
index 7164f989..9a13d21e 100644
--- a/R/SliwianyTb2.R
+++ b/R/SliwianyTb2.R
@@ -19,4 +19,11 @@
 #' de vida e projetos sociais, Petrópolis, RJ: Vozes. (Tabela 2 pág. 61)
 #'
 #'
+#' @example 
+#' comparando a porcentagem de crescimento de cada tipo de necessidade:
+#' barplot(SliwianyTb2$IC, names.arg = SliwianyTb2$TN, 
+#' main = "Íncice de Crescimento 1970-1960(%)", 
+#' xlab = "Tipos de Necessidades")
+#'
+#'
 NULL
\ No newline at end of file
diff --git a/R/SliwianyTb4.R b/R/SliwianyTb4.R
index e1df744a..f479608d 100644
--- a/R/SliwianyTb4.R
+++ b/R/SliwianyTb4.R
@@ -13,6 +13,13 @@
 #' @keywords sociometria
 #' @source Sliwiany, Regina Maria, 1997, Sociometria: como avaliar a qualidade 
 #' de vida e projetos sociais, Petrópolis, RJ: Vozes. (Tabela 4 pág. 73)
-
+#' 
+#' @example 
+#' Comparando os Coeficientes e Mortalidade Infantil em cada ano.
+#' 
+#' barplot(SliwianyTb4$Coef, names.arg = SliwianyTb4$ANO, 
+#' main = "Coeficiente de Mortalidade Infantil, 
+#' por 1000 nascidos vivos, 1977 - 1982", 
+#' col = rainbow(7))
 #'
 NULL
\ No newline at end of file
-- 
GitLab