Skip to content
Snippets Groups Projects
Commit fe19cd26 authored by Walmes Marques Zeviani's avatar Walmes Marques Zeviani
Browse files

Merge branch 'maria137' into devel

parents c7e03ccc db081919
No related branches found
No related tags found
No related merge requests found
Pipeline #
......@@ -44,6 +44,7 @@ Depends:
Suggests:
lattice,
latticeExtra,
colorspace,
reshape,
ggplot2,
car,
......
#' @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.
#' Destaca-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, em que
#'
#' \describe{
#'
#' \item{\code{variável}}{Explicação da variável.}
#'
#' }
#' @keywords sociometria
#' @source SLIWIANY (1997), Quadro 25, pág. 127.
#' @examples
#'
#' data(SliwianyQd25)
#' str(SliwianyQd25)
#'
#' dados <- SliwianyQd25[, 9]
#' barplot(dados,
#' legend.text = SliwianyQd25$Regionais,
#' args.legend = list(x = "topright", bty = "n"),
#' col = colorspace::heat_hcl(5),
#' main = paste("Índices Globais Brasileiros Para Diferentes\n",
#' "Tipos de Desnutrição (%)"),
#' horiz = TRUE, xlim = c(0, 80))
#'
#' db <- data.frame(Regional = SliwianyQd25[, 1],
#' stack(x = SliwianyQd25[, -1]))
#' db$ind <- factor(db$ind, levels = unique(db$ind))
#'
#' library(lattice)
#'
#' xyplot(values ~ ind | Regional, data = db, type = "o",
#' xlab = "Regionais", ylab = "Desnutrição",
#' scales = list(x = list(rot = 90),
#' y = list(relation = "free")))
#'
NULL
#' @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 8 linhas e 11 colunase, em que
#' \describe{
#'
#' \item{\code{x1}}{Expressar-se através de desenhos.}
#'
#' \item{\code{x2}}{Diferenciar o desenho da escrita.}
#'
#' \item{\code{x3}}{Classificar segundo a cor.}
#'
#' \item{\code{x4}}{Possuir determinadas noções de tempo.}
#'
#' \item{\code{x5}}{Saber onde moram os animais.}
#'
#' \item{\code{x6}}{Saber da importância dos animais para o homem.}
#'
#' \item{\code{x7}}{Saber sobre as profissões existentes no seu
#' bairro.}
#'
#' \item{\code{x8}}{Reconhecer o que é natureza e o que é construído
#' pelo homem.}
#'
#' \item{\code{x9}}{Modelar com massinha um objeto da cozinha da
#' creche.}
#'
#' \item{\code{x10}}{Imitar animais.}
#'
#' }
#' @keywords sociometria
#' @source SLIWIANY (1997), Quadro 26, pág. 129.
#' @examples
#'
#' data(SliwianyQd26)
#' str(SliwianyQd26)
#'
#' dados <- SliwianyQd26[, 9]
#' barplot(dados, names.arg = SliwianyQd26$Jardim.I,
#' col = colorspace::rainbow_hcl(9),
#' main = paste("Níveis de Satisfação Totais da Rede Oficial\n",
#' "nos Medidores de Ação Educativa (%)"),
#' ylim = c(0, 60))
#'
NULL
#' @name SliwianyQd27
#' @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
#' II nos medidores dos subgrupos de ação educativa, por bairro.
#' @format Um \code{data.frame} com 10 linhas e 9 colunas, em que
#'
#' \describe{
#'
#' \item{\code{x1}}{Desenhar uma história narrada.}
#'
#' \item{\code{x2}}{Relatar o desenho feito a partir da história
#' narrada.}
#'
#' \item{\code{x3}}{Classificar segundo a cor e forma.}
#'
#' \item{\code{x4}}{Possuir determinadas noções de tempo.}
#'
#' \item{\code{x5}}{Saber do que se alimentam os animais.}
#'
#' \item{\code{x6}}{Saber da importância dos animais para o homem.}
#'
#' \item{\code{x7}}{Saber sobre as profissões existentes no seu
#' bairro.}
#'
#' \item{\code{x8}}{Saber dizer o que gostaria que tivesse em seu
#' bairro.}
#'
#' \item{\code{x9}}{Modelar com massinha um objeto da cozinha da
#' creche.}
#'
#' \item{\code{x10}}{Imitar animais.}
#'
#' }
#' @keywords sociometria
#' @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),
#' main = "Níveis de Satisfação Totais da Rede Oficial
#' nos Medidores de Ação Educativa(%)", ylim = c(0, 60))
#'
NULL
#' @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, em que
#'
#' \describe{
#'
#' \item{\code{P.D}}{Pessoas por dormitórios.}
#'
#' \item{\code{ND}}{Número de domicílios.}
#'
#' }
#' @keywords sociometria
#' @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]
#' barplot(prop,
#' ylim = c(0, 50),
#' names.arg = num,
#' col = rainbow(9),
#' ylab = "Frequência relativa (%)")
#'
NULL
Regionais Boqueirao Boa Vista Cajuru Campo Comprido Matriz Pinheirinho Portao 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. Cronica 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 desnutricao 22.2 17.5 23.4 14.7 16.7 15.6 25.5 20.8
Jardim I x1 x2 x3 x4 x5 x6 x7 x8 x9 x10
Boa Vista 23.1 50 56.3 39.1 31.9 10.6 25.3 25.3 33.4 72.8
Boqueirao 34.7 53.9 70 14.5 41.5 27 40.1 39.6 47.8 86.9
Cajuru 26.5 57.9 70.8 34.1 33.7 9.7 23.8 16.8 56.1 62.5
Campo Comprido 37.2 55.8 71.9 25.6 49.1 19.5 37.8 32.6 44.8 83.7
Matriz 40.3 42.1 63.4 26.3 57.9 19.2 33.2 31.3 29.7 66.6
Pinheirinho 37.5 47.7 76.9 31.4 38.8 23 51.4 41.4 37.3 63.1
Portao 29.8 46 75.6 16.6 31.7 10.4 49 33.3 63 80.7
TOTAL 33.5 50 71.7 24.7 38.1 17.6 42.1 34.2 48.7 74.7
Jardim II x1 x2 x3 x4 x5 x6 x7 x8 x9 x10
Boa Vista 42.7 60.4 81 28.3 40.2 18.5 32.5 26.9 85.8 85.4
Boqueirao 65.8 58 76.7 14.9 57.3 29 67.6 20.6 78.3 81
Cajuru 70.9 52.5 83.8 25.6 58 29.9 65.1 35.1 83.8 86.6
Campo Comprido 70.9 68.5 91.3 33.1 53.7 29.4 74.1 39.4 74.4 96.5
Matriz 42.4 54.5 80.3 28.4 70.3 31.6 63.2 38.7 73.4 85.5
Pinheirinho 63.2 54.1 67.3 23.2 59.2 35.7 61.8 29 64.2 69.7
Portao 55.6 44.4 83 24 55.2 20.6 68.4 19.4 82.7 84.3
TOTAL 60.1 53.2 78.7 24.6 56.8 27.8 64.9 27 77 81
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
File added
File added
File added
File added
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/SliwianyQd25.R
\name{SliwianyQd25}
\alias{SliwianyQd25}
\title{Tipos de Desnutrição e Seus Índices por Regionais}
\format{Um \code{data.frame} com 5 linhas e 9 colunas, em que
\describe{
\item{\code{variável}}{Explicação da variável.}
}}
\source{
SLIWIANY (1997), Quadro 25, pág. 127.
}
\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.
Destaca-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.
}
\examples{
data(SliwianyQd25)
str(SliwianyQd25)
dados <- SliwianyQd25[, 9]
barplot(dados,
legend.text = SliwianyQd25$Regionais,
args.legend = list(x = "topright", bty = "n"),
col = colorspace::heat_hcl(5),
main = paste("Índices Globais Brasileiros Para Diferentes\\n",
"Tipos de Desnutrição (\%)"),
horiz = TRUE, xlim = c(0, 80))
db <- data.frame(Regional = SliwianyQd25[, 1],
stack(x = SliwianyQd25[, -1]))
db$ind <- factor(db$ind, levels = unique(db$ind))
library(lattice)
xyplot(values ~ ind | Regional, data = db, type = "o",
xlab = "Regionais", ylab = "Desnutrição",
scales = list(x = list(rot = 90),
y = list(relation = "free")))
}
\keyword{sociometria}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/SliwianyQd26.R
\name{SliwianyQd26}
\alias{SliwianyQd26}
\title{Níveis de Satisfação Alcançados nos Medidores dos Subgrupos da
Ação Educativa}
\format{Um \code{data.frame} com 8 linhas e 11 colunase, em que
\describe{
\item{\code{x1}}{Expressar-se através de desenhos.}
\item{\code{x2}}{Diferenciar o desenho da escrita.}
\item{\code{x3}}{Classificar segundo a cor.}
\item{\code{x4}}{Possuir determinadas noções de tempo.}
\item{\code{x5}}{Saber onde moram os animais.}
\item{\code{x6}}{Saber da importância dos animais para o homem.}
\item{\code{x7}}{Saber sobre as profissões existentes no seu
bairro.}
\item{\code{x8}}{Reconhecer o que é natureza e o que é construído
pelo homem.}
\item{\code{x9}}{Modelar com massinha um objeto da cozinha da
creche.}
\item{\code{x10}}{Imitar animais.}
}}
\source{
SLIWIANY (1997), Quadro 26, pág. 129.
}
\description{
Níveis de satisfação alcançados por crianças do Jardim I
nos medidores dos subgrupos de ação educativa, por bairro.
}
\examples{
data(SliwianyQd26)
str(SliwianyQd26)
dados <- SliwianyQd26[, 9]
barplot(dados, names.arg = SliwianyQd26$Jardim.I,
col = colorspace::rainbow_hcl(9),
main = paste("Níveis de Satisfação Totais da Rede Oficial\\n",
"nos Medidores de Ação Educativa (\%)"),
ylim = c(0, 60))
}
\keyword{sociometria}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/SliwianyQd27.R
\name{SliwianyQd27}
\alias{SliwianyQd27}
\title{Níveis de Satisfação Alcançados nos Medidores dos Subgrupos da
Ação Educativa (\%)}
\format{Um \code{data.frame} com 10 linhas e 9 colunas, em que
\describe{
\item{\code{x1}}{Desenhar uma história narrada.}
\item{\code{x2}}{Relatar o desenho feito a partir da história
narrada.}
\item{\code{x3}}{Classificar segundo a cor e forma.}
\item{\code{x4}}{Possuir determinadas noções de tempo.}
\item{\code{x5}}{Saber do que se alimentam os animais.}
\item{\code{x6}}{Saber da importância dos animais para o homem.}
\item{\code{x7}}{Saber sobre as profissões existentes no seu
bairro.}
\item{\code{x8}}{Saber dizer o que gostaria que tivesse em seu
bairro.}
\item{\code{x9}}{Modelar com massinha um objeto da cozinha da
creche.}
\item{\code{x10}}{Imitar animais.}
}}
\source{
SLIWIANY (1997), Quadro 27, pág. 130.
}
\description{
Níveis de satisfação alcançados por crianças do Jardim
II nos medidores dos subgrupos de ação educativa, por bairro.
}
\examples{
SliwianyQd27
dados <- SliwianyQd27[, 9]
barplot(dados, names.arg = SliwianyQd27$Jardim.II,
col = colorspace::rainbow_hcl(9),
main = "Níveis de Satisfação Totais da Rede Oficial
nos Medidores de Ação Educativa(\%)", ylim = c(0, 60))
}
\keyword{sociometria}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/SliwianyTb7.R
\name{SliwianyTb7}
\alias{SliwianyTb7}
\title{Densidade Média Domiciliar}
\format{Um \code{data.frame} com 10 linhas e 2 colunas, em que
\describe{
\item{\code{P.D}}{Pessoas por dormitórios.}
\item{\code{ND}}{Número de domicílios.}
}}
\source{
SLIWIANY (1997), Tabela 7, pág. 76.
}
\description{
Medidor representante densidade domiciliar, para a zona
urbana do estado do Paraná em 1980.
}
\examples{
SliwianyTb7
dados <- SliwianyTb7$ND[1:9]
prop <- (dados/991000) * 100
num <- SliwianyTb7$P.D[1:9]
barplot(prop,
ylim = c(0, 50),
names.arg = num,
col = rainbow(9),
ylab = "Frequência relativa (\%)")
}
\keyword{sociometria}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment