distribfrequencia.r

amerhamdan — Nov 2, 2012, 11:02 PM

#Distribuicao de frequencia para variaveis qualitativas 
Sexo<-c("M", "M", "M", "F", "M", "F", "F", "F", "M", "F", "F", "M", "M", "F", "F", "F", "F", "M", "M", "M", "F", "M", "M", "F", "F", "M", "M", "F", "F", "F")
Sexo
 [1] "M" "M" "M" "F" "M" "F" "F" "F" "M" "F" "F" "M" "M" "F" "F" "F" "F"
[18] "M" "M" "M" "F" "M" "M" "F" "F" "M" "M" "F" "F" "F"
table(Sexo) #frequencia absoluta
Sexo
 F  M 
16 14 
prop.table(table(Sexo))# frequencia relativa
Sexo
     F      M 
0.5333 0.4667 
100*table(Sexo)/length(Sexo)
Sexo
    F     M 
53.33 46.67 
barplot(table(Sexo))#grafico da frequencia absoluta

plot of chunk unnamed-chunk-1

barplot(prop.table(table(Sexo)))# grafico para frequencia relativa

plot of chunk unnamed-chunk-1

pie(table((Sexo)))# gráfico por setores (pizza)

plot of chunk unnamed-chunk-1

#Distribuicao de frequencia para variaveis quantitativas
Idade<-c(18, 18, 20, 22, 28, 29, 20, 25, 34, 38, 40, 22, 19, 37, 27, 28, 38, 22, 33, 33, 32, 28, 31, 27, 25, 22, 28, 40, 21, 27)
Idade
 [1] 18 18 20 22 28 29 20 25 34 38 40 22 19 37 27 28 38 22 33 33 32 28 31
[24] 27 25 22 28 40 21 27
table(Idade)
Idade
18 19 20 21 22 25 27 28 29 31 32 33 34 37 38 40 
 2  1  2  1  4  2  3  4  1  1  1  2  1  1  2  2 
hist(Idade)

plot of chunk unnamed-chunk-1