0,7

没有重复的行，因为行n有和n。

我们将两个或多个有限序列的Lyndon积定义为通过将序列混合在一起可以获得的词典编纂最大序列。例如，（231）与（213）的林登积是（232131），（221）与。Lyndon词是相对于Lyndon乘积为素数的有限序列。等价地，Lyndon单词是严格小于其所有循环旋转的有限序列。每个有限序列对Lyndon单词都有一个唯一的（无序）因子分解，如果这些因子按字典序递减排列，那么它们的串联等于它们的Lyndon乘积。例如，（1001）对Lyndon因式分解（001）（1）进行了排序。

似乎有些数字（如10）从未出现在序列中。

n，a（n）的表，n=0..83。

三角形开始：

1: (1)

2: (1,1)

3: (1,1,1)

4: (3,1)

5: (4,1)

6: (1,4,1)

7: (2,4,1)

8: (1,2,4,1)

9: (1,1,2,4,1)

10: (3,2,4,1)

11: (1,3,2,4,1)

12: (1,1,3,2,4,1)

13: (3,3,2,4,1)

14: (9,4,1)

15: (1,9,4,1)

16: (2,9,4,1)

17: (16,1)

18: (1,16,1)

19: (1,1,16,1)

20: (3,16,1)

例如，将A000002号是（1221221211221），使用Lyndon因式分解（122）（122），（12）（1122）（1），所以第13行是（3,3,2,4,1）。

lynQ[q_]：=数组[Union[{q，RotateRight[q，#]}]=={q，旋转右[q，#]}&，长度[q]-1，1，And]；

lynfac[q_]：=如果[Length[q]==0，{}，函数[i，前缀[lynfac[Drop[q，i]]，Take[q，i]][Last[Select[Range[Length[q]]，lynQ[Take[q，#]]&]]]；

kolagrow[q_]：=如果[Length[q]<2，取[{1，2}，Length[C]+1]，附加[q，切换[{q[[Length[Split[q]]]，q[[2]]，最后的[q]}，{1，1，1}，0，{1 2，2，2}，1]]]

kol[n_Integer]：=嵌套[kolagrow，{1}，n-1]；

表[Length/@lynfac[Reverse[kol[n]]，{n，100}]

行长度为A329317飞机.

非反向版本为A329315型.

囊性纤维变性。A000002号,A000031号,A001037号,A027375号,A059966号,A060223号,A088568号,A102659号,A211100型,A288605型,A296372型,A296658型,A329314型,A329325型.

上下文中的序列：A320640型 A055187号 A217780型*A109411号 A302240型 A130307号

相邻序列：A329313型 A329314型 A329315型*A329317飞机 A329318型 A329319型

非n,标签

古斯·怀斯曼2019年11月11日

经核准的