条形图中单个条的宽度问题

Problem with the width of a single bar in a barchart

我不知道如何表述我的问题,所以问题是:

我的代码:

  geom_bar(position = "dodge", stat="count")+
  scale_fill_grey(labels = c("Besetzt", "Unbesetzt"))+
  labs(y="Anzahl an Kästen",
       x="Objekt",
       caption="Fig. 1: Vergleich des Besatzes der Objekte an denen die Kästen angebracht sind")+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(),
        panel.background = element_blank(), axis.line = element_line(colour = "black"))

这是我的情节:

我的问题是第一个巴尔康吧。它是其他宽度的两倍,因为没有安装在 Balkon 上的蝙蝠盒被占用。我怎样才能改变它,使 Balkon 栏的黑色部分与其他栏的宽度相同。

我非常感谢能得到的每一个帮助。

您需要更改以下行:

...geom_bar(position = "dodge", stat="count")

收件人:

...geom_bar(position = position_dodge(preserve = 'single'), stat="count")

这将统一条形的大小