ggplot2：geom_barでバー間の幅とスペースを減らす方法

Question

width引数を使用してgeom_barのバーの幅を変更できることを理解しています。これは機能しますが、棒の間に大きなギャップを作成します。手動でバーを近づける方法はありますか？代わりに軸を操作する必要がありますか？

次に、幅を右側で0.3に変更して、目的のバーの幅を取得する例を示します。

library(tidyverse)
library(gridExtra)

p1 <- ggplot(iris, aes(Species, Petal.Length)) + geom_bar(stat="summary")
p2 <- ggplot(iris, aes(Species, Petal.Length)) + geom_bar(stat="summary", width=0.3)
grid.arrange(p1,p2,nrow=1)

注：この質問はこれと似ていますが、ギャップを埋める答えは明確ではありませんでした。

geom_barのバー間のスペースを変更するには？

Answer 1

プロットの縦横比を調整し、ggplotに自動的にバーの適切な幅とバー間のギャップを割り当てます。

  ggplot(iris, aes(Species, Petal.Length)) + 
      geom_bar(stat="summary", width=0.4) +
      theme(aspect.ratio = 2/1)

これを生成します：