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

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

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

library(ggplot2)
# Loading

groups = c(rep("q",8),rep("w",rep("e",8))
keys = c(c(1:8),c(1:8),c(1:8))
values = c(rep(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)

解决方法

试试这个：

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

,

我的猜测是图像的大小/分辨率有问题。如果尺寸/分辨率很小，您可能会得到这个结果。您的图像为 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 正在重新绘制不同大小的图像).