r - 使用ggplot堆栈图根据总值放置一条线性线

Question

我再次问这个问题，我之前的问题没有受到任何打击。也许我问错了。这是我的数据框：

 

   Date     Server  HardDisk 
1 2010-01-30 server1       100 
2 2010-02-28 Server1       400   
3 2010-03-30 Server1       300 
4 2010-01-30 Server2       200 
5 2010-02-28 Server2       500   
6 2010-03-30 Server2       300 

我想做的是基于服务器创建一个堆栈栏（每个服务器都应该基于日期堆栈）。我可以轻松做到这一点。我还喜欢根据 Date 的总值使用 geom_smooth() 添加一条线性线。

我可以像这样创建堆栈图：

ggplot(x, aes(Date, HardDisk) +      geom_bar(aes(fill=Server), stat="identity",  position="stack") +      theme_bw()

我将如何在此堆栈图表之上添加 geom_smooth() 。Geom_smooth() 应基于每个日期的总值：

Date          Hardisk
2010-01-30     300
2010-02-28     900
2010-03-30     600

有任何想法吗？