Mam zestaw zmiennych binarnych (z wartościami 0 i 1), i chcę stworzyć dwustronną tablicę liczenia, która podsumowuje liczbę dopasowań par zmiennych (Tzn. Obie mają wartość 1). Oto przykład zestawu danych:
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")
W końcu, chciałbym mieć tabelę, w której liczy się powtarzalność grozy(=1) i podłogi(=1), Thriller(=1) i podłogi(=1), Komedii(=1) i podłogi(=1), Romans(=1) i podłogi(=1), a także sci.fi(=1) i paul(=1).