Jak najít všechny kombinace (podmnožinu) libovolné velikosti pole v postgresql

Následující funkce vytvoří všechny kombinace požadované velikosti jako sadu řádků s jednou kombinací na řádek:

create or replace function get_combinations(source anyarray, size int) returns setof anyarray as $$
 with recursive combinations(combination, indices) as (
   select source[i:i], array[i] from generate_subscripts(source, 1) i
   union all
   select c.combination || source[j], c.indices || j
   from   combinations c, generate_subscripts(source, 1) j
   where  j > all(c.indices) and
          array_length(c.combination, 1) < size
 )
 select combination from combinations
 where  array_length(combination, 1) = size;
$$ language sql;

Tato funkce je v typu pole polymorfní.