R成对产品

use*_*626 5 product r outer-join

我试图获得矢量的成对产品

a = c(1,2,3,4)
Run Code Online (Sandbox Code Playgroud)

我想要得到的是

2,3,4,6,8,12(按此顺序).

我尝试过使用外部:

outer(1:4,2:4)
Run Code Online (Sandbox Code Playgroud)

这给了我一个矩阵,其中包括我想要的产品,但我不知道如何从矩阵中提取它们的方式可以扩展到更高维度的矢量.

谢谢!

Jos*_*ien 9

combn() 对于这种事情很好:

a <- 1:4

combn(a, m = 2, FUN = prod) 
# [1]  2  3  4  6  8 12
Run Code Online (Sandbox Code Playgroud)

  • 或`combn(1:4,2,prod)` (4认同)