Tengo un conjunto de variables binarias (con los valores de 0 y 1) y quiero crear un camino de dos recuento tabla que resume la cuenta de la concurrencia de los pares de variables (es decir, dos de ellos tienen el valor de 1). Aquí es un ejemplo de conjunto de datos:
mm <- matrix(0, 5, 6)
m <- 2
n <- 2
df <- data.frame(apply(mm, c(1,2), function(x) sample(c(0,1),1)))
colnames(df) <- c("Horror", "Thriller", "Comedy", "Romantic", "Sci.fi", "gender")
En la final, me gustaría tener la tabla que cuenta la concurrencia de Horror(=1) y el género(=1), Thriller(=1) y el género(=1), la Comedia(=1) y el género(=1), Romántico(=1) y el género(=1), y la médula espinal.fi(=1) y el género(=1).