Tengo el siguiente vector:
crias = c(4, 7, 2, 8, 6, 7, 2, 2, 9, 5, 5, 4, 5, 2, 6, 4, 7, 8, 4, 8)
Cuyos valores quiero agrupar según los intervalos delimitados por los siguientes extremos:
L = c(1.95, 3.45, 4.95, 6.45, 7.95, 9.45)
Así que hago uso de la función cut()
:
criasInt = cut(crias,
breaks = L, #Extremos de los intervalos
right = FALSE #Intervalos cerrados por la izquierda
)
Calculo las frecuencias absolutas:
ni = table(criasInt)
[1.95,3.45) [3.45,4.95) [4.95,6.45) [6.45,7.95) [7.95,9.45)
4 4 5 3 4
Y las relativas:
fi = prop.table(ni)
[1.95,3.45) [3.45,4.95) [4.95,6.45) [6.45,7.95) [7.95,9.45)
0.20 0.20 0.25 0.15 0.20
Sin embargo, si represento la información mediante un histograma:
hist(crias,
breaks = L, #Extremos de los intervalos
freq = FALSE, #Frecuencias relativas
right = FALSE, #Intervalos cerrados por la izquierda
xaxt = "n", #Elimina la leyenda del eje X
xlab = "Intervalos", ylab = "",
col = "lightblue",
main = "Frecuencias relativas"
)
axis(1, at = L) #Intervalos como leyenda del eje X
El tamaño de las barras parece el apropiado, pero la escala del eje Y, dado fi
, no es la que espero. ¿A qué puede deberse?