ggplot2 - 具有堆栈和闪避的条形图

我正在尝试使用创建条形图ggplot2我通过一个变量进行堆叠并通过另一个变量进行躲避。

这是一个示例数据集：

df=data.frame(
  year=rep(c("2010","2011"),each=4),
  treatment=rep(c("Impact","Control")),
  type=rep(c("Phylum1","Phylum2"),each=2),
  total=sample(1:100,8))

我想创建一个条形图，其中x=treatment, y=total，堆叠变量为type躲避的变量是year。当然我可以选择其中之一：

ggplot(df,aes(y=total,x=treatment,fill=type))+geom_bar(position="dodge",stat="identity")

ggplot(df,aes(y=total,x=treatment,fill=year))+geom_bar(position="dodge",stat="identity")

但两者都不是！感谢任何可以提供建议的人。

这是使用分面而不是躲避的另一种方法：

ggplot(df, aes(x = year, y = total, fill = type)) +
    geom_bar(position = "stack", stat = "identity") +
    facet_wrap( ~ treatment)

根据泰勒的建议进行更改：+ theme(panel.margin = grid::unit(-1.25, "lines"))