r - ggplot 和 gmosaic 在 R 的条形图中显示百分比

Question

我有这样的数据框

companies churn
a          0
b          1
c          0
...

如何使用ggplot和gmosaic拥有这样的图表：

我试过这段代码，但它不起作用

ggplot(data = countchurn)+
  geom_mosaic(aes(x=product(id), fill=n))+theme(axis.text.x=element_text(angle=-25, hjust= .1))