检验过的

经核准的

提出

检验过的

编辑

提出

行[1]＝｛1｝；row[n_]：=行[n]=（For[rows=Join[row/@Range[n-1]]；ro={}；k=n，Length[ro]<n，k=k+n，If[FreeQ[rows，k]，AppendTo[ro，k]]]；ro）；数组[行，12]//展平(*Jean-François Alcover公司2017年4月28日*）

经核准的

编辑

编辑

经核准的

自然数的重新排列，使得接下来的n个数 每个可被n整除的。

经核准的

编辑

检验过的

经核准的

提出

检验过的

编辑

提出

1;

2,,4;

三,,6,,9;

8, 12, 16, 20;

5, 10, 15, 25, 30;

18, 24, 36, 42, 48, 54;

7, 14, 21, 28, 35, 49, 56;

32, ...

经核准的

编辑