Neste trabalho farei algumas observações acerca da base de dados “questionario social”

load("C:/Users/Arthur/Desktop/Base_de_dados-master/questionario_social_survey.RData")

Gerando as tabelas

tabela_questionario <-table(questionario_social_survey$estado_civil)

tabela_questionario

## 
##  Sem resposta   Nunca casou   Separado(a) Divorciado(a)      Viúvo(a) 
##            17          5416           743          3383          1807 
##     Casado(a) 
##         10117

Agora vou gerar os gráficos

pie(tabela_questionario)

Agora vou alterar as cores do gráfico e inserir um título

pie(tabela_questionario,col=c("#653678","#3d917f","#c0cf3e","#8c1923","#453133"),main="gráfico do estado civil")

Como conclusão ao trabalho, podemos notar que a maior parte dos que tomaram parte na pesquisa se encontram no estado civil de “casado”, ou então “nunca se casou”, estas duas categorias ocupam a maior parte do gráfico, representadas pelas cores roxo e ciano, respectivamente.

As categorias que menos são representadas na pesquisa são as de “divorciado”, “viuvo”, “separado” e “sem resposta”, este último que tem uma parcela tão pequena que quase não é visível no gráfico,

Gráfico de pizza, segunda atividade

Arthur Hansen

18/03/2021

Gerando as tabelas

Agora vou gerar os gráficos

Agora vou alterar as cores do gráfico e inserir um título

Como conclusão ao trabalho, podemos notar que a maior parte dos que tomaram parte na pesquisa se encontram no estado civil de “casado”, ou então “nunca se casou”, estas duas categorias ocupam a maior parte do gráfico, representadas pelas cores roxo e ciano, respectivamente.

As categorias que menos são representadas na pesquisa são as de “divorciado”, “viuvo”, “separado” e “sem resposta”, este último que tem uma parcela tão pequena que quase não é visível no gráfico,