ggplot2 facet_grid：如何修复 geom_col 中列之间的不同间距答案

【问题标题】：ggplot2 facet_grid: how to fix different spacing between columns in geom_colggplot2 facet_grid：如何修复 geom_col 中列之间的不同间距
【发布时间】：2021-05-06 16:19:18
【问题描述】：

我的数据集包含三个独立组的不同键的值，我想使用facet_grid 为 3 个不同组创建一个包含这些值的条形图。这是我到目前为止所做的，但是我找不到固定条之间间距的方法（从图片中可以清楚地观察到它们是不同的）。我尝试为geom_col 更改参数width 和position，但没有帮助。我该如何解决？

library(ggplot2)
# Loading

groups = c(rep("q", 8), rep("w", 8), rep("e", 8))
keys = c(c(1:8), c(1:8), c(1:8))
values = c(rep(8, 8), rep(8, 8), rep(8, 8))
data = data.frame(groups, values, keys)

ggplot(data, aes(x = keys, y = values)) +
  geom_col(width=0.9375) +
  facet_grid(~groups)

【问题讨论】：

标签： r ggplot2 spacing facet-grid geom-col

【解决方案1】：

试试这个：

ggplot(data) + 
  geom_bar(aes(x = keys, y = values), stat = "identity") +
  facet_grid(~groups)

【讨论】：

我通过添加图表修改了我的答案，您可以看到列的间距相等。您的问题可能是由于仅显示。尝试将图像放大到整个屏幕或类似的东西
好的，谢谢。问题在于图像的分辨率。
很好！如果答案对你有用，如果你愿意接受它

【解决方案2】：

我的猜测是图像的大小/分辨率有问题。如果尺寸/分辨率很小，您可能会得到这个结果。您的图像是 614 x 362，@Leonardo 是 1362x699。我的猜测是，这就是造成这种奇怪间距的原因。

g <- ggplot(data, aes(x = keys, y = values)) +
  geom_col() + facet_grid(~groups)

png(filename = "Rplotsmall.png", width=614, height = 362)
print(g)
dev.off()

png(filename = "Rplotlarge.png", width=1362, height = 699)
print(g)
dev.off()

小图（奇怪的间距）：

大图（间距看起来不错）：

如果您使用 Rstudio 并打印到绘图窗口，当您单击“缩放”并增加或减小窗口大小时，您应该会看到这种奇怪的效果出现和消失（因为 Rstudio 正在重新绘制不同大小的图像)。

【讨论】：