r语言 - 条件计数与dplyr和通常计数在一个代码

Question

我想知道以下内容:我得到了一个包含以下列的数据集:

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的数量和每年的资金。例如:

year    asset (#s)    fund
2018     20          3150
I

df %>% group_by(Year,) %>% summarise(Fund = n_distinct(navfund, Asset_S = sum (Asset = "S")

这是我试过的代码，但它不工作，我希望任何人可以帮助。提前谢谢你。

Answer 1

在单个summarise中创建所有变量

df %>%
group_by(year) %>%
summarise(
Fund = n_distinct(navfund),
Asset_S = sum(Asset == "S")
)