如何调整ggplot柱状图间距，优化共享单车出行数据可视化效果

解决方法 #

你遇到的柱子间距过宽问题通常有两个核心原因，对应调整方案如下：

1. 优先方案：将x轴的Origen_Id转为因子类型
   你的Origen_Id是站点编号，属于分类变量而非连续数值，ggplot默认识别为数值型时，会按照实际数值间距排布x轴，站点编号不连续就会出现大量空白。转为因子后会按出现顺序均匀排布，自动消除不合理空白，同时可以通过width参数调整柱子宽度（数值越大柱子越宽、间距越小，默认值为0.9）：

s <- ggplot(most, aes(x = factor(Origen_Id), y = Num_Viaje_Ori)) +
  geom_bar(stat = "identity", width = 0.8)
# 可以额外加x轴标签优化可读性
s <- s + xlab("站点编号")

2. 若需要保留x轴为连续数值轴（比如要体现站点编号的数值差异），直接调大geom_bar的width参数即可
   连续轴下width的单位和x轴刻度单位一致，根据你的站点最小间隔（34-11=23），可以设置为10~20之间的数值，就能让柱子变紧凑：

s <- ggplot(most, aes(x = Origen_Id, y = Num_Viaje_Ori)) +
  geom_bar(stat = "identity", width = 15)

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