ggplot2 position ='dodge'生成太宽的条形图

Question

我有兴趣生成一个position ='dodge'和fill =某个因子的直方图（即每个bar / group中不同子组的并排条），但是ggplot2给了我类似于这里的第一个图 ，它有一个最右边的酒吧太宽，没有为空组保留空间，我想要。

这是一个简单的案例：

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 - 条形太宽我得到了这个想法，虽然它在技术上产生了一个相同宽度的条，但保留空组的空间：

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

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

Answer 1

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

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