如何组织堆叠的条形图，以便变量按顺序堆叠

Question

我正在尝试沿X轴（日期）绘制三个不同的变量。但是，当“净政府”为正数时，其条形出现在其他两个变量之上。如何更改它，以使该条形显示在其他两个变量的下方，因此使用负值时看起来更平滑。谢谢。

我的代码如下：

netSaving<- melt(netSaving, id.vars = "DATE")
netSaving
ggplot(data = netSaving, aes(x = DATE, y = value, fill = variable)) + geom_bar(stat = "identity")