лучший способ, чтобы получить сумму столбца data.frame в R с dplyr

Question

Чтобы поместить sum в виде data.frame столбца в переменной я сделал, что:

library(dplyr) 
data <- data.frame("x" = c(1,2,3), "y" = c("a","b","c")) 
way01 <- data %>% filter(y == "d") %>% summarise(total = sum(x)) %>% .$total 
way02 <- data %>% filter(y == "d") %>% .$x %>% sum 

Я чувствую, что это неуклюжая сделать summarise(total = sum(x)) %>% .$total или %>% .$x %>% sum , Есть более элегантный способ сделать это?

Я хотел бы что-то вроде %>% sum(.$x), но это не сработает.

PS: предлагается использовать "d" в качестве фильтра, для обработчика случая, где numeric(0) не проблема.

Answer 1

Вы можете использовать %$% вместо %>%, чтобы иметь прямой доступ к столбцам:

> data %>% filter(y == "d") %$% sum(x) 
[1] 0 

Answer 2

Вы можете быть после того, как:

way03 <- data %>% filter(y == "d") %>% { sum(.$x) } 

Использование { } объясняется:

?magrittr::`%>%` 

Answer 3

Поскольку он используется с резюме, вы всегда можете обмануть R и использовать грязные хаки:

data %>% summarise(total = sum(x[y == "d"])) %>% first() 

или даже

data %>% summarise(sum(x[y == "d"])) %>% first() 

, которая возвращает:

[1] 0 

Опять же, это эквивалентно last(), nth(n=1) и nth(n=-1) для этого сценария.