Предполагая ваши data.frame df
. Использование dplyr
:
library(dplyr)
df %>% mutate(year = substr(year.month, 1, 4)) %>%
group_by(badge_name, year) %>%
summarise(count = sum(count))
С base
R вы можете сделать что-то вроде:
df$year <- substr(df$year.month, 1, 4)
with(df, tapply(count, df[,c('badge_name', 'year')], sum))