Как получить сводку из 2 столбцов данных да / нет в R?

Question

Допустим, у меня есть фрейм данных, созданный примерно так:

> hangry <- data.frame("Hungry" = c("Yes", "Yes", "No", "Yes", "No", "Yes"), "Angry" = c("No", "Yes", "Yes", "No", "No", "Yes"))
> hangry
  Hungry Angry
1    Yes    No
2    Yes   Yes
3     No   Yes
4    Yes    No
5     No    No
6    Yes   Yes

Легко получить сводку по отдельным столбцам, например, так:

> summary(hangry$Hungry)
 No Yes 
  2   4 

Но как мне поступитьо создании сводки обоих столбцов, чтобы получить счет каждой комбинации.например, что-то вроде этого;

> summary(hangry$Hungry combined_with hangry$Angry) #yes I know this is a ridiculous simplification
Yes/Yes  Yes/No  No/Yes  No/No
      2       2       1      1

Полагаю, мне понадобится более сложный код, который не даст мне такого красиво отформатированного резюме.Я также предполагаю, что есть много способов достичь того, чего я хочу.Хотя я довольно новичок в R и застрял на этом.

Answer 1

Функции агрегации dplyr очень полезны для таких сводок:

library(dplyr)

hangry %>% group_by_all() %>% count()

Answer 2

стол (Голодный, Злой) тоже должен делать свое дело