我想知道以下几点：我得到了一个数据集，包含以下几列：

df <- data.frame(year = c(2018, 2018, 2018, 2019, 2019), 
                 navfund = c(2000, 1000, 1200, 1100, 2000), 
                 Asset = c('s', 'f', 's', 'h', 's'))

year   navfund   Asset  
2018   2000      s       
2018   1000      f       
2018   1200       s      
2019   1100      h       
2019   2000      s       
...               
...

我希望它是这样的：对于每一年，我想知道s的数目和每一年的基金，例如：
一个二个一个一个
这是我试过的代码，但是不起作用，我希望任何人都能帮忙。提前谢谢你。