順列と組合せを配列にして返す関数を短くしたい

Question

順列と組合せの関数を書いてみました。
1.さらに短くなるのかご指導願います。
2.組み合わせの関数で、combinatorics ([1,2,3,4,5,6],1) の時に、[1,2,3,4,5,6]の戻り値を返す方法が思いつきません。
何かよい方法はないでしょうか？

//順列を配列にして返す
const permutations=((f=(A,B=A.length,C=[])=>--B?A.reduce((a,b,c,[...d],_=d.splice(c,1))=>[...a,...f(d,B,[...C,b])],[]):A.map(a=>[...C,a]))=>f)();

/*
function combinatorics (a, n = a.length, rst = []) {
  return 1 === n
  ? a
  : a.reduce ((r,b,i)=>
      r.concat(combinatorics (a.slice (i+1), n-1).map (c=> [b].concat(c)))
  , rst);
}
*/
//組み合わせを配列にして返す
const combinatorics=((f=(a,n=2,r=[])=>--n?a.reduce((r,b,i)=>r.concat(f(a.slice(i+1),n).map(c=>[b].concat(c))),r):a)=>f)();

console.log (combinatorics ([1,2,3,4,5,6], 2));

Comments

[yambejp]

ユニークな数値の入った配列からn個の数値の組み合わせを順列で取り出すのでしょうか？
[1,2,2]のようなものはNG、[2,1]のような取り出しはNG

> combinatorics ([1,2,3,4,5,6],1) の時に、[1,2,3,4,5,6]

組み合わせなのですから戻り値は[[1],[2],[3],[4],[5],[6]]が正しいのでは？

[babu_babu_baboo]

[1,2,2]はNGです。
[[1],[2],[3],[4],[5],[6]]　たしかにこれが正しいですね。
ゆっくりと考えます。

Answer 1

自己解決にしました。

組合せを配列で返す関数

function combinatorics (ary, depth = 1, rst = []) {
  if (depth) {
    for (let i = 0, I = ary.length; i < I; i++) {
      let
        a = ary[i],
        c = combinatorics (ary.slice (i + 1), depth - 1);
      if (c) {
        for (j of c) {
          rst.push ([a].concat(j));
        }
      } else {
        rst = rst.concat ([[a]]);
      }
    }
  }
  else {
    rst = null;
  }
  return rst;
}

短く

const combinatorics =((f=(a,c=1,r=[])=>c?a.reduce((r,d,e,_,g=f(a.slice(e+1),c-1))=>r.concat(g?g.map(z=>[d].concat(z)):[[d]]),r):0)=>f)();

console.log (combinatorics ([1,2,3,4,5,6], 1));
console.log (combinatorics ([1,2,3,4,5,6], 2));
console.log (combinatorics ([1,2,3,4,5,6], 3));