2015-05-25

Transformar tabla de contingencia en tabla de de frecuencias

Title

Problema

Deseamos transformar una tabla de contingencia en una tabla de frecuencias.

# Tabla de contigencia
tabla <- table(mtcars[, c("am", "gear")])
   gear
am   3  4  5
  0 15  4  0
  1  0  8  5

Tabla de frecuencias

tabla <- table(mtcars[, c("am", "gear")])
cuenta <- as.data.frame(tabla)
cuenta
  am gear Freq
1  0    3   15
2  1    3    0
3  0    4    4
4  1    4    8
5  0    5    0
6  1    5    5

Transformar tabla de frecuencias en tabla de contingencia

ftable(xtabs(Freq ~ am + gear, data = cuenta)) 
   gear  3  4  5
am              
0       15  4  0
1        0  8  5
Es el equivalente a:

ftable(mtcars[, c("am", "gear")])

Referencias

No hay comentarios:

Publicar un comentario

Nube de datos