如何在geom_text中显示总计数

Question

我一直在尝试制作预订的计数而没有预订。下面是我使用过的代码。它给了我所有日子的全部数量（总和）。如何修改我的代码，让我计算堆叠图。我想要预订的次数和未预订的次数。

p <- ggplot(swiss,aes(x=as.factor(No.of.days.request.took)))
p + geom_bar(aes(fill=as.factor(Booking_new))) + 
    geom_text(aes(label=..count..),
              vjust=1,stat='count',
              position = "stack")