R pairwise product

Question

I'm trying to get the pairwise products of a vector, say

a = c(1,2,3,4)

What I'm trying to get is

2,3,4,6,8,12 (in that order).

I've tried using outer:

outer(1:4,2:4)

and that gives me a matrix that includes the products I want but I'm not sure how to extract them from the matrix in a way that scales to vectors of higher dimensions.

Thanks!

Josh O'Brien · Accepted Answer · 2013-09-19T16:06:05.180

9

combn() is nice for this sort of thing:

a <- 1:4

combn(a, m = 2, FUN = prod) 
# [1]  2  3  4  6  8 12

edited Sep 19 '13 at 16:06

answered Sep 19 '13 at 15:55

Josh O'Brien

159,210
26
366
455

4

or `combn(1:4, 2, prod)` – GSee Sep 19 '13 at 15:56

score 3 · Answer 2 · answered Sep 19 '13 at 15:55

3

lower.tri selects them in that order:

out <- outer(1:4,1:4)
out[lower.tri(out)]
# [1]  2  3  4  6  8 12

answered Sep 19 '13 at 15:55

Frank

66,179
8
96
180

R pairwise product

2 Answers2

Linked