r - 将多个序列中的元素总和折叠到有序列表 R

Question

设 r = c(0,1,2) 和 s = c(0,5,10)。我想要一个可以接受 r 和 s 的函数(最终将接受两个以上的序列——我想尽可能避免循环!)，并返回 r 和 s 中元素总和的所有唯一组合的有序列表，即 return以下内容:

0,1,2,5,6,7,10,11,12

谢谢!

Answer 1

您可以组合函数 expand.grid() 和 rowSums()。 expand.grid() 将生成所有组合的数据框，rowSums() 将计算这些组合的总和。

r = c(0,1,2)
s = c(0,5,10)
rowSums(expand.grid(r,s))
[1]  0  1  2  5  6  7 10 11 12

使用函数 sort() 您可以对值进行排序。

r = c(0,1,2)
s = c(0,5,10)
k=c(3,4,6)
rowSums(expand.grid(r,s,k))
 [1]  3  4  5  8  9 10 13 14 15  4  5  6  9 10 11 14 15 16  6  7  8 11 12 13 16 17 18
sort(rowSums(expand.grid(r,s,k)))
 [1]  3  4  4  5  5  6  6  7  8  8  9  9 10 10 11 11 12 13 13 14 14 15 15 16 16 17 18