r - 如何根据字符串变量对数值变量的值求和

Question

考虑以下数据框:

df <- data.frame(numeric=c(1,2,3,4,5,6,7,8,9,10), string=c("a", "a", "b", "b", "c", "d", "d", "e", "d", "f"))
print(df)
numeric string
1        1      a
2        2      a
3        3      b
4        4      b
5        5      c
6        6      d
7        7      d
8        8      e
9        9      d
10      10      f

它有一个数字变量和一个字符串变量。现在，我想创建另一个数据框，其中字符串变量仅显示唯一值“a”、“b”、“c”、“d”、“e”、“f”的列表，而数字变量是前一个数据帧中数值总和的结果，产生此数据帧:

print(new_df)
numeric string
1        3      a
2        7      b
3        5      c
4       22      d
5        8      e
6       10      f

这可以使用 for 循环来完成，但在大型数据集中效率相当低，我更喜欢其他选项。我尝试过使用 dplyr包，但没有得到预期的结果:

library(dplyr)
> df %>% group_by(string) %>% summarize(result = sum(numeric))
result
1     55

Answer 1

这可能是 plyr 中的屏蔽函数的问题(summarise/mutate 函数也存在于 plyr 中)。我们可以从 dplyr

显式指定 summarise

library(dplyr)
df %>% 
    group_by(string) %>%
    dplyr::summarise(numeric = sum(numeric))