r - ggplot2 减少 geom_point() 因素之间的空间

Question

我正在尝试制作垂直散点图。与您在许多箱线图中看到的类似。但是，在条形图中，我可以增加条形的宽度以缩小不同因素条形之间的差距，但这对 geom_point 不起作用(无论如何看起来都不吸引人)。我在这里不知所措。

例子:

df <- data.frame('facs' = sample(1:5, 50, replace = TRUE), 
                 'var' = sample(c('boy','girl'), 50, replace = TRUE),
                 'val' = rnorm(50)
                 )
ggplot(df, aes(facs, val)) + geom_point(aes(color = as.factor(facs), size = 4)) + facet_wrap(~var)

输出看起来像这样，但我真的想缩短两者之间的所有空白空间:

Answer 1

您可以尝试添加 + coord_fixed(ratio = 3) ，或任何 > 1 的数字，这将固定轴比率。

顺便说一句，搬家size = 4出aes()将摆脱传说中不必要的部分。即 geom_point(aes(color = as.factor(facs)), size = 4)