Подсчитайте число появлений значений в ggplot

Question

У меня есть следующие данные:

df = data.frame(c("2012","2012","2012","2013"), 
       c("tuesday","tuesday","friday","thursday"), 
       c("AAA","BBB","AAA","AAA")) 
colnames(df) = c("year","day","type") 

Я хочу, чтобы показать количество появлений (абсолютная частоту) type значений (AAA, BBB) в год и день. В настоящее время я написал следующий код, но для этого требуется добавить еще одно измерение к aes, например. aes(type, some_dimension, fill = as.factor(year)). Итак, как я могу добавить что-то вроде count(type)?

ggplot(dat) + 
    geom_bar(aes(type, fill = as.factor(year)), 
      position = "dodge", stat = "identity") + 
    facet_wrap(~day) 

Answer 1

В geom_barstat изменения от "identity" до "count", как здесь:

library("ggplot2") 

ggplot(df) + 
    geom_bar(aes(x = type, fill = as.factor(year)), 
      position = "dodge", stat = "count") + 
    facet_wrap(~day)