ggplot2：如何同时减小geom_bar的柱宽与柱间距

嘿，我来帮你搞定这个柱间距的问题！你说得对，设置width参数确实能调整柱宽，但默认会让柱子之间的间距变大——这是因为ggplot给每个离散x类别默认分配了1个单位的空间，当你把柱宽设小后，剩下的空间就变成了柱子间的空隙。下面给你两种针对性的解决方案，不需要复杂的坐标轴操作：

一、单组柱状图（每个x类别一个柱子） #

如果是像你示例里的单组情况（比如iris的三个Species各一个柱子），想要拉近柱子间距，你可以手动给每个x类别分配更紧凑的连续位置，具体步骤如下：

1. 给离散的x变量（比如Species）设置更靠近的数值位置
2. 用scale_x_continuous()映射回原来的类别标签，保持可读性

示例代码：

library(tidyverse)
library(gridExtra)

# 给每个Species分配紧凑的位置（默认间距是1，这里改成0.4）
iris_compact <- iris %>%
  mutate(Species_pos = case_when(
    Species == "setosa" ~ 1,
    Species == "versicolor" ~ 1.4,
    Species == "virginica" ~ 1.8
  ))

# 绘制紧凑版柱状图（保持0.3的柱宽）
p_compact <- ggplot(iris_compact, aes(Species_pos, Petal.Length)) +
  geom_bar(stat="summary", width=0.3) +
  scale_x_continuous(
    breaks = c(1, 1.4, 1.8),
    labels = levels(iris$Species)
  )

# 和原版本对比
p_original <- ggplot(iris, aes(Species, Petal.Length)) +
  geom_bar(stat="summary", width=0.3)

grid.arrange(p_original, p_compact, ncol=2)

这样修改后，柱子之间的间距会明显缩小，同时你想要的0.3柱宽也保留了。

二、分组柱状图（每个x类别多个柱子） #

如果是分组的柱状图（比如x是Species，fill是另一个分组变量），你可以用position_dodge()的width参数来控制组内柱子的间距，配合geom_bar的width一起使用：

示例代码：

# 先构造一个分组变量
iris_grouped <- iris %>%
  mutate(Petal_Wide = ifelse(Petal.Width > 1, "Wide", "Narrow"))

# 调整组内柱子间距
ggplot(iris_grouped, aes(Species, Petal.Length, fill=Petal_Wide)) +
  geom_bar(stat="summary", width=0.3, position=position_dodge(width=0.4))

这里position_dodge(width=0.4)会让同组的柱子更靠近，你可以根据需求调整这个数值。

额外技巧：缩小图表整体空白 #

如果你只是想让图表左右更紧凑，不需要改变柱子之间的间距，可以调整scale_x_discrete()的expand参数，去掉x轴两侧的空白：

ggplot(iris, aes(Species, Petal.Length)) +
  geom_bar(stat="summary", width=0.3) +
  scale_x_discrete(expand = c(0, 0))

内容的提问来源于stack exchange，提问作者Alex