汇总数据

Question

我有一个数据帧与价值观：

x y value 
A B 10 
B A 15 
A C 5 
C A 10 
B C 20 

df <- data.frame(x = c("A", "B", "A", "C", "B"), 
       y = c("A", "A", "C", "A", "C"), 
       value = c(10, 15, 5, 10, 20)) 

我想这个数据汇总到X和ÿ每个组合，每位值的总和组合。其结果将是：

x y value 
A B 25 
A C 15 
B C 20 

我发现这个question这或多或少是同样的问题，因为我有。但解决方案不适用于我的情况。这是因为x和y中的值是字符串，而min()和max()将不起作用。

任何想法如何做到这一点？

Answer 1

一种选择是sort行的前两列和替换它，使用aggregate由团“X”和“Y”得到“价值”的sum。

df[1:2] <- t(apply(df[1:2], 1, sort)) 
aggregate(value~., df, sum) 
# x y value 
# 1 A B 25 
# 2 A C 15 
# 3 B C 20