Perl 6中一个列表的所有子集

Question

10

我想知道（记得Perl 6拥有你所希望的一切），是否有一些内置工具可以帮助生成列表的所有非空子集（顺序无关）。

例如，我有一个列表：

my @a = 1, 2, 3;

我需要一个函数f，使得f(@a)会输出:

((1), (2), (3), (1, 2), (1, 3), (2, 3), (1, 2, 3))

- Eugene Barsky

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- Christoph · Accepted Answer

@a.combinations(1..*)

将返回您要查找的Seq。请注意，如果没有该参数，将生成一个空列表作为第一个元素。