R拆分并得到每组的总和

Question

我是R的初学者，我遇到了一个可能很简单的问题。我有一个类似的数据框NEI_small：

现在我想计算每年排放量的总和。所以看起来应该是这样的：

 year  Emission
 1999  29920139
 2002  41757550

如何获得小组的总和？

我尝试了这个，但它没有用：

   sapply(split(NEI_small,NEI_small$year),sum(NEI_small$Emissions))

但我收到了这个错误：

  

match.fun（FUN）出错：＆＃39; sum（NEI_small $ Emissions）＆＃39; ist nicht   Funktion，Zeichen oder Symbol

有人可以帮帮我吗？