Coleta dos Dados da Turma 3003

Quando iniciamos os estudos sobre linguagem R,foram perguntados dados básicos da turma 3003 como idade, sexo e altura.

A seguir, utilizamos os dados coletados no R na forma de vetores:

#Dados da turma
sexo=c("F","F","F","F","M","F","F","M","M","F","M","M","M","M","M","M","M")
idade=c(17,17,16,18,16,17,17,17,17,17,17,17,17,17,17,17,16)
altura=c(150,158,157,167,170,169,172,176,179,163,179,178,179,170,165,170,175)

Agora precisamos realizar o tratamento da informação:

#Tratamento da variável
tabsexo=table(sexo)
tabsexo
## sexo
##  F  M 
##  7 10

Gráfico de setores

Com a função table(), as informações do vetor “sexo” serão quantificadas, assim possibilitando a construção do gráfico.

#Gráfico de pizza
pie(tabsexo,
    main="sexo",
    col=c("peachpuff"," peru"),
    labels=c(7,10))
legend(1,1,
       legend=c("Feminino", "Masculino"),
       col=c("peachpuff","peru"),
       pch=c(15))

Gráficos para variáveis quantitativas

Gráfico de Barras

Agora, colocaremos as informações do vetor “idade” em um gráfico de barras:

#Grafico de barras

#Tratamento de informação
tabidade=table(idade)
tabidade
## idade
## 16 17 18 
##  3 13  1
barplot (
  tabidade, 
  main= "Idade dos alunos",
  col= c("gold1", "grey87", "turquoise"),
  xlab = "Idades",
  ylab= "Freq. Absoluta",
  ylim= c(0,20),
  border = FALSE)

Por fim, colocamos as informações de altura também em um gráfico de barras:

#gráfico da altura
hist(altura,
     main="Altura dos alunos da 3003",
     xlab= "altura (cm)",
     ylab= "Freq. Absoluta",
     ylim= c(0, 12),
     col="tan3",
     labels=T,
     breaks = seq(130,190,10),
     right=FALSE
     )