Aqui falarei sobre gráficos de pizzas,tabelas e proporções.

Vamos começar com a importação dos dados para RMarkdown

Aprendemos alguns comandos de como inserir esses graficos em codigos

# Passo 1 - Importação do Excel
library(readxl)
Familias <- read_excel("C:/Users/User/Desktop/Base_de_dados-master/Familias.xls")

Tabela em relação a famílias

# Passo 2 - Criar uma tabela

tabela_1 <- table(Familias$p.a.p)
tabela_1
## 
## Não usa     Usa 
##      42      78
# Passo 3 - Formatação da Tabela
library(flextable)
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

logo após fiz a mesma tabela só que em proporção

# Passo 4 - Proporção
prop.table(tabela_1)*100
## 
## Não usa     Usa 
##      35      65

E por fim fizemos alguns gráficos em forma de pizza

# Passo 5 - Gráfico
pie(tabela_1)

pie(tabela_1,main = "Famílias que usam o p.a.p")

pie(tabela_1,main = "Famílias que usam o p.a.p",col = c("blue","red"))

pie(tabela_1,main = "Famílias que usam o p.a.p",col = c("#cf1fae","#ff052f"))

#---------------------------------
tabela_2 <- table(Familias$local)
tabela_2
## 
##   Encosta do Morro        Monte Verde Parque da Figueira 
##                 37                 40                 43
pie(tabela_2,main = "gráfico 2- Local de moradia",col=c("blue","hotpink","red") )

Conclusão

COnseugimos ver os dados em vários formatos na aula de hoje,em gráficos de pizza,em proporções e ate mesmo em tabelas