r - ggplot2 位置 ='dodge' 产生太宽的条形

我有兴趣生成一个带有 position='dodge' 和 fill=some factor(即每个条/组内不同子组的并排条)的直方图，但 ggplot2 给了我类似 the first plot here 的东西，它有一个最右边的条这太宽了，没有为我想要的空组保留空间。

这是一个简单的案例:

df = data.frame(a=c('o','x','o','o'), b=c('a','b','a','b'))
qplot(a, data=df, fill=b, position='dodge')

从 ggplot geom_bar - bars too wide 我得到了这个想法，虽然它在技术上产生了一个相同宽度的条，但没有为空组保留空间:

ggplot(df, aes(x=a, fill=a))+
geom_bar(aes(y=..count../sum(..count..))) +
facet_grid(~b,scales="free",space="free")

我如何实现我想要的？提前致谢。

最佳答案

ggplot 中的默认选项产生了我认为您所描述的内容。 scales="free" 和 space="free" 选项与您想要的相反，因此只需从代码中删除它们即可。此外，stat 的默认 geom_bar 是通过计数聚合，因此您不必明确指定您的统计信息。

ggplot(df, aes(x=a, fill=a)) + geom_bar() + facet_grid(~b)

关于r - ggplot2 位置 ='dodge' 产生太宽的条形，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/7104542/