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