Introdução

Aqui vou falar sobre gráficos de pizza, tabelas e proporções.

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

aqui eu vou continuar escrevendo o meu texto.

A minha tabela

aqui fiz uma tabela.

# 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)

depois fiz minha tabela de proporção

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

depois disso, finalmente alguns graficos

# PASSO 5 - Gráfico
pie(tabela_1)

pie(tabela_1,main = "Gráfico 1 - Famílias que usam o P.A.P")

pie(tabela_1,main = "Gráfico 1 - Famílias que usam o P.A.P",col = c("red","blue")) 

pie(tabela_1,main = "Gráfico 1 - Famílias que usam o P.A.P",col = c("#06285c","#d8dde6"))