|
| |
|
| A299070型 |
| 正三角形T（n，k）是n的组成数，其标准因式分解为Lyndon单词时有k个不同的因子。 |
|
1
|
|
|
|
1, 2, 0, 3, 1, 0, 5, 3, 0, 0, 7, 9, 0, 0, 0, 13, 17, 2, 0, 0, 0, 19, 39, 6, 0, 0, 0, 0, 35, 72, 21, 0, 0, 0, 0, 0, 59, 141, 55, 1, 0, 0, 0, 0, 0, 107, 266, 132, 7, 0, 0, 0, 0, 0, 0, 187, 511, 300, 26, 0, 0, 0, 0, 0, 0, 0
(列表;桌子;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
三角形开始：
1
2 0
3 1 0
5 3 0 0
7 9 0 0 0
13 17 2 0 0 0
19 39 6 0 0 0 0
35 72 21 0 0 0 0 0
59 141 55 1 0 0 0 0 0
107 266 132 7 0 0 0 0 0 0
187 511 300 26 0 0 0 0 0 0 0.
a（5,2）=9组分为（41）、（32）、（311）、（131）、（221）、
(41) = (4) * (1)
(32) = (3) * (2)
(311) = (3) * (1)^2
(131) = (13) * (1)
(221) = (2)^2 * (1)
(212) = (2) * (12)
(2111) = (2) * (1)^3
(1211) = (12) * (1)^2
(1121) = (112) * (1).
|
|
|
数学
|
LyndonQ[q_]：=数组[OrderedQ[{q，RotateRight[q，#]}]&，Length[q]-1，1，And]&&Array[Rotate右[q，#]&，长度[q]，1，UnsameQ]；
qit[q_]：=如果[#===长度[q]，{q}，前缀[qit[Drop[q，#]]，Take[q，#]]&[Max@@Select[Range[Length[q]]，LyndonQ[Take[q，#]]&]]；
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，Length[Cunion[qit[#]]==k&]]，{n，11}，{k，n}]
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
