From 050a6f38c0a9549ba9b422b16b114ebd0c2310fa Mon Sep 17 00:00:00 2001
From: Maria <mariaholiveira34@gmail.com>
Date: Thu, 1 Sep 2016 17:12:12 -0300
Subject: [PATCH] Adiciona tabela 7, quadros 25 e 26.

---
 R/SliwianyQd25.R          |  28 ++++++++++++++++++++++++++++
 R/SliwianyQd26.R          |  37 +++++++++++++++++++++++++++++++++++++
 R/SliwianyTb7.R           |  28 ++++++++++++++++++++++++++++
 data-raw/SliwianyQd25.txt |   6 ++++++
 data-raw/SliwianyQd26.txt |  11 +++++++++++
 data-raw/SliwianyTb7.txt  |  11 +++++++++++
 data/SliwianyQd25.rda     | Bin 0 -> 480 bytes
 data/SliwianyQd26.rda     | Bin 0 -> 571 bytes
 data/SliwianyTb7.rda      | Bin 0 -> 280 bytes
 9 files changed, 121 insertions(+)
 create mode 100644 R/SliwianyQd25.R
 create mode 100644 R/SliwianyQd26.R
 create mode 100644 R/SliwianyTb7.R
 create mode 100644 data-raw/SliwianyQd25.txt
 create mode 100644 data-raw/SliwianyQd26.txt
 create mode 100644 data-raw/SliwianyTb7.txt
 create mode 100644 data/SliwianyQd25.rda
 create mode 100644 data/SliwianyQd26.rda
 create mode 100644 data/SliwianyTb7.rda

diff --git a/R/SliwianyQd25.R b/R/SliwianyQd25.R
new file mode 100644
index 00000000..1161d5a5
--- /dev/null
+++ b/R/SliwianyQd25.R
@@ -0,0 +1,28 @@
+#' @name SliwianyQd25
+#' @title Tipos de Desnutrição e Seus Índices por Regionais
+#' @description Através da metodologia de Seoane Latham modificada por 
+#'     Batista Filho, que classifica as crianças desnutridas segundo o 
+#'     tipo de sua desnutrição, tem-se um índice bastante pequeno de 
+#'     crianças com desnutrição crônica, e um índice pouco mais 
+#'     acentuada de crianças com desnutrição pregressa e recente. 
+#'     Destacas-se ainda a existência de um programa global de nutrição
+#'     bastante coerente já que existe uma forte homogeneidade dos 
+#'     índices entre as regionais.
+#' @format Um \code{data.frame} com 5 linhas e 9 colunas
+#'
+#' 
+#' @keywords sociometria
+#' @source Sliwiany, Regina Maria, 1997, Sociometria: como avaliar a 
+#'     qualidade de vida e projetos sociais, Petrópolis, RJ: Vozes. 
+#'     (Quadro 25, pág. 127)
+#' 
+#' @examples 
+#'    dados <- SliwianyQd25[, 9]
+#'    barplot(dados, legend.text = SliwianyQd25$Regionais, 
+#'    col = colorspace::heat_hcl(5), 
+#'    main = "Índices Globais Brasileiros Para Diferentes Tipos de 
+#'    Desnutrição (%)",
+#'    horiz = TRUE, xlim = c(0, 80))
+#' 
+#'
+NULL
\ No newline at end of file
diff --git a/R/SliwianyQd26.R b/R/SliwianyQd26.R
new file mode 100644
index 00000000..7025b94d
--- /dev/null
+++ b/R/SliwianyQd26.R
@@ -0,0 +1,37 @@
+#' @name SliwianyQd26
+#' @title Níveis de Satisfação Alcançados nos Medidores dos Subgrupos
+#' da Ação Educativa (%)
+#' @description Níveis de satisfação alcançados por crianças do Jardim I
+#' nos medidores dos subgrupos de ação educativa, por bairro.
+#' @format Um \code{data.frame} com 10 linhas e 9 colunas.
+#'
+#' \describe{
+#'
+#' \item{\code{3.1.1}}{Expressar-se através de desenhos}
+#' \item{\code{3.1.2}}{Diferenciar o desenho da escrita}
+#' \item{\code{3.1.3}}{Classificar segundo a cor}
+#' \item{\code{3.1.4}}{Possuir determinadas noções de tempo}
+#' \item{\code{3.1.5}}{Saber onde moram os animais}
+#' \item{\code{3.1.6}}{Saber da importância dos animais para o homem}
+#' \item{\code{3.1.7}}{Saber sobre as profissões existentes no seu 
+#' bairro}
+#' \item{\code{3.1.8}}{Reconhecer o que é natureza e o que é construído
+#' pelo homem}
+#' \item{\code{3.1.9}}{Modelar com massinha um objeto da cozinha da creche}
+#' \item{\code{3.1.10}}{Imitar animais}
+#' }
+#' 
+#' @keywords sociometria
+#' @source Sliwiany, Regina Maria, 1997, Sociometria: como avaliar a 
+#'     qualidade de vida e projetos sociais, Petrópolis, RJ: Vozes. 
+#'     (Quadro 26, pág. 129)
+#' 
+#' @examples 
+#'    dados <- SliwianyQd26[, 9]
+#'    barplot(dados, names.arg = SliwianyQd26$Jardim.I, 
+#'    col = colorspace::rainbow_hcl(9), 
+#'    main = "Níveis de Satisfação Totais da Rede Oficial 
+#'    nos Medidores de Ação Educativa(%)", ylim = c(0, 100))
+#' 
+#'
+NULL
\ No newline at end of file
diff --git a/R/SliwianyTb7.R b/R/SliwianyTb7.R
new file mode 100644
index 00000000..5e592896
--- /dev/null
+++ b/R/SliwianyTb7.R
@@ -0,0 +1,28 @@
+#' @name SliwianyTb7
+#' @title Densidade Média Domiciliar
+#' @description Medidor representante densidade domiciliar, para a zona
+#' urbana do estado do Paraná em 1980.
+#' @format Um \code{data.frame} com 10 linhas e 2 colunas
+#'
+#' \describe{
+#'
+#' \item{\code{P.D}}{Pessoas por dormitórios}
+#' \item{\code{ND}}{Número de domicílios}
+#' }
+#' 
+#' @keywords sociometria
+#' @source Sliwiany, Regina Maria, 1997, Sociometria: como avaliar a 
+#'     qualidade de vida e projetos sociais, Petrópolis, RJ: Vozes. 
+#'     (Tabela 7 pág. 76)
+#' 
+#' @examples 
+#'     dados <- SliwianyTb7$ND[1:9]
+#'     prop <- (dados/991000)*100
+#'     num <- SliwianyTb7$P.D[1:9]
+#'     barplot(prop, ylim =c(0, 50), main = "Porcentagem de Domicílios 
+#'     com x Pessoas por Dormitórios", names.arg = num, 
+#'     col = rainbow(9))
+#' 
+#' 
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/SliwianyQd25.txt b/data-raw/SliwianyQd25.txt
new file mode 100644
index 00000000..cade1a8d
--- /dev/null
+++ b/data-raw/SliwianyQd25.txt
@@ -0,0 +1,6 @@
+Regionais	Boqueir�o	Boa Vista	Cajuru	Campo Comprido	Matriz	Pinheirinho	Port�o	Global
+Normais	77.8	82.5	76.6	83.3	84.4	84.4	74.5	79.2
+Desn. Pregressa	11.4	5.8	10.5	7.35	15.6	5.4	11.0	9.2
+Desn. Cr�nica	1.8	2.9	1.4	0	1.1	1.0	2.2	1.6
+Desn. Recente	9.0	8.8	11.5	7.35	0	9.2	12.3	10.0
+Todas as formas de desnutri��o	22.2	17.5	23.4	14.7	16.7	15.6	25.5	20.8
diff --git a/data-raw/SliwianyQd26.txt b/data-raw/SliwianyQd26.txt
new file mode 100644
index 00000000..f8365209
--- /dev/null
+++ b/data-raw/SliwianyQd26.txt
@@ -0,0 +1,11 @@
+Jardim I	Boa Vista	Boqueirao	Cajuru	Campo Comprido	Matriz	Pinheirinho	Portao	TOTAL
+3.1.1	23.1	34.7	26.5	37.2	40.3	37.5	29.8	33.5
+3.1.2	50	53.9	57.9	55.8	42.1	47.7	46	50
+3.1.3	56.3	70	70.8	71.9	63.4	76.9	75.6	71.7
+3.1.4	39.1	14.5	34.1	25.6	26.3	31.4	16.6	24.7
+3.1.5	31.9	41.5	33.7	49.1	57.9	38.8	31.7	38.1
+3.1.6	10.6	27	9.7	19.5	19.2	23	10.4	17.6
+3.1.7	25.3	40.1	23.8	37.8	33.2	51.4	49	42.1
+3.1.8	25.3	39.6	16.8	32.6	31.3	41.4	33.3	34.2
+3.1.9	33.4	47.8	56.1	44.8	29.7	37.3	63	48.7
+3.1.10	72.8	86.9	62.5	83.7	66.6	63.1	80.7	74.7
diff --git a/data-raw/SliwianyTb7.txt b/data-raw/SliwianyTb7.txt
new file mode 100644
index 00000000..6eeb45ea
--- /dev/null
+++ b/data-raw/SliwianyTb7.txt
@@ -0,0 +1,11 @@
+P/D	ND
+0:1	133552
+1:2	479076
+2:3	231862
+3:4	87505
+4:5	33355
+5:6	13875
+6:7	6257
+7:8	3062
+8:9	2456
+GERAL	991000
diff --git a/data/SliwianyQd25.rda b/data/SliwianyQd25.rda
new file mode 100644
index 0000000000000000000000000000000000000000..fdcb064bc8fce52b52c6519bf243afe3c8477cd2
GIT binary patch
literal 480
zcmb2|=3oE=w%Fi<ej<(nZ|_F7ozY5g;`q2AvQsZkVv1|e@|inS=9s*0YRTSxnK?IY
z`NHaJymS8W+J5B!(>Cu93xAxcp&HxasJ)@KEi1p2l<utyjlCLs`M%wa3^^0Y<kDxA
zreWU`Zmu{SlFTdCuy60|lN+D>d^tPiv1IZ+rG$p+;sxnCm9MgYGANZDzJLA*`$Wlz
zyNdkX=W@9xx369IZ|-SE^;b+ywz_;<4UQc=^0vG21h?aZH`z<uW2Cyu>-|;lY)M!m
zX1><tfWgld7d{;?4?UTgHlgrwke0CT&jkTeVc{RnMn~<*whDXnO<X&Eas7(NqGnSo
zvUlCp{8|0HLtk0${G_@MCr>^9@zUMR>ErE{Q-26HU7RoSHni)%%-h#L?i<|OE95SB
z^J7%&|8IKpcK21f>^JDY^#0`0vwvjkIV&&vKUy2`=d0J=+Ev?q_efp+Ipa%r*4}sj
z4C1~_ui!sfFZ_M=`Kg~57MvFqkoa<RVaU%?ZWjHkCp|oP*WWE*;Qzi<Ge-Gm?7zAt
z?kQ)>e}0H)jWxBoW>o0+Pn%D-*zMZdd1v|+)XsGEeXRBpe=7OUZ`r+%Ji_19rcTRJ
q+w&lCmEvD7&&IIF7pA7xFWt3w<;j#H&%fng<u{y=T0V=JfdK#vj`czS

literal 0
HcmV?d00001

diff --git a/data/SliwianyQd26.rda b/data/SliwianyQd26.rda
new file mode 100644
index 0000000000000000000000000000000000000000..2eaad550ac949d29b0c1e5c9f86f8114e6b592c6
GIT binary patch
literal 571
zcmb2|=3oE=w%Cxfd6yjo?j7^ZbXuuZ_-f`f;RsJ2-^;6BsqvX;y8X;_c)BA?C~?Y>
zqlHliSMpyF*Wf?UDXpGo<50;E*C1@JqN2x}e17}7$rG<_zW?Tox&5uu-BmFs<kDLO
zG!rGbl~OO18M@AA-Kb%-B)pI9-Okl+@=<pWO%pg)yJ_Ox9qv}rKLt6OGnQuRUfkuJ
zJ@YS1@%bV>-m3Jy2WOOJPh^k2JZ+}==Ub{wJD&t9a;{OSn8e~gIYFDV%X7nAmZdwH
zE~_(}Ui*49^!ruM2S2y$Ubs~%Ot1TOxXS#LSQn+a?SBK7)K>a_a(?$eX-}rBk~iP&
zt<&Of-h1|W#`ZsLmHhudRK9NdDX;AR)%ta8Z}^P!`_gI~_N?FMYGe4GuR`W*_n*`w
zr{~Z4?l}K(_k+`p)*rGx7!&WE5<R}x;odd-W2!f@XSBEe5&hwL=Aq@M(mHpGXKRz@
zoiB;Ivb)*hZhPxbuP3*U|CIYPd%p6#+f|19nZHzrILW-)Q2KvHzN}5?3$D*6k3G%V
zTV3_9BYW}rIqSGTN`F|LC>QjZv0U!#C$B53-$!;oSJ{3rJ=w1E$;HoFkL#`#%)b?X
zz`FXbd)AH1*KL^}e_Hry_qz*gnA5f98O85@>~L4=o`2Q4^)`PUa=zw0@^1*sHMRNb
zb6a}euRQZ_l`EO<|K%vz{<80$5NmC6`?BZkhN-(QznCJccYVe=+Y>qAtf$`m4*3(~
iEP3DByfpaXd@a#)rB-wQ9eus`CqIA6MU$T_3=9Cuq#;89

literal 0
HcmV?d00001

diff --git a/data/SliwianyTb7.rda b/data/SliwianyTb7.rda
new file mode 100644
index 0000000000000000000000000000000000000000..73ef539d9b6a71eb80da9ffaf24937219b84bdf5
GIT binary patch
literal 280
zcmb2|=3oE=w%7>={SG;ZxaOy8T##DaDP8u*ky&?(h4o}9aVf<GoVNwNoPrd^lnT@D
z{A90d)Bb;Wexhfs-*2BckM>y_f4+BiuH^CH`*U|Ouq@f4ppxhturZ+7`SnGW*mu*a
zz7~BKVElAui<8{tSF_AEx6f3*xx{LvW7ecOi{8&qwe_7hxx~37E3Z5FW?<~Gb)O__
zMGe?i9lsG=du$(<q_e1@Th;-Kfaj{W!lys(p6w-7J?#~5`_Jwj7dF4OQns4Vb)4(D
zaPLEzPk*_u{Wbqk#@oVpp=we7t;^B&1()(d--iD(OsqaQ(=9G$(T?73&Y9sxJBs&S
my{EMJXV>z{Ys=++|7#OoAM(lO{`5wEdt2sXhi@=4FaQ7yUxWPs

literal 0
HcmV?d00001

-- 
GitLab