数组元素的唯一乘积

Question

我有一个数组，例如[3 5 7 11]。我想找出这些元素的唯一倍数，即

1. 成对元素的乘积 -- 15, 21, 33, 35, 55, 77

2. 三个元素的乘积——105、385、231

3. 四个元素的乘积——1055。

我目前对如何以一种有效的方式进行操作感到困惑，这样当我将它扩展到数组中的大量元素时，我不会爆炸我的内存并杀死我的计算机。

我当前的代码：

prime_factor=[3 5 7 11]; 
for i=1:length(prime_factor) 
    pfm=unique([pfm cumprod(circshift(prime_factor,i,2))]) 
endfor

Answer 1

魔术函数是nchoosek，nchoosek(v,k) 从输入向量v 中产生k 元素的所有组合。只需沿着输出的行计算产品即可获得所需的结果：

v = [3 5 7 11];
prod(nchoosek(v,2),2)

产量：

ans =
    15
    21
    33
    35
    55
    77

prod(nchoosek(V,3),2)

产量：

ans =
   105
   165
   231
   385

prod(nchoosek(V,4),2)

产量：

ans =
        1155