dplyr总结条件

Question

我想应用dplyr函数summarise_all来计算每列中的平均值。但是，我确实想要省略0值，因此需要构建一个条件语句。

df <- data.frame(x = c(1,0,4,6,0,9), y = c(12,42,8,0,11,2)) 
df %>% summarise(mean) 

Here它解释了如何definig每个单列aggrecation温控功能时做的。不过，我想使用summarise_all，因为我的originla数据包含很多列。

Answer 1

我们neeed使用

df %>% 
    summarise_all(funs(mean(.[.!=0])))