我想使用dplyr汇总来按组对计数进行求和。具体来说,如果并非所有求和值均为NA,我想删除NA值,但是如果所有求和值均为NA,我想显示NA。例如:
name <- c("jack", "jack", "mary", "mary", "ellen", "ellen")
number <- c(1,2,1,NA,NA,NA)
df <- data.frame(name,number)
Run Code Online (Sandbox Code Playgroud)
在这种情况下,我想要以下结果:
但是,如果我设置na.rm = F:
df %>% group_by(name) %>% summarise(number = sum(number, na.rm = F))
Run Code Online (Sandbox Code Playgroud)
结果是:
如果我设置na.rm = T:
df %>% group_by(name) %>% summarise(number = sum(number, na.rm = T))
Run Code Online (Sandbox Code Playgroud)
结果是
我该如何解决,以便具有数字和NA的个案获得一个数字作为输出,但是只有NA的个案获得NA作为输出。