library(dplyr)
N <- 100
df <- data_frame(
id = 1:N,
v1 = sample(5, N, TRUE),
v2 = sample(1e6, N, TRUE)
)
sum_up(df)
sum_up(df, v2, d = TRUE)
sum_up(df, v2, d = TRUE, i = v1>3)
df %>% group_by(v1) %>% sum_up(starts_with("v"))
Run the code above in your browser using DataLab