显示1-1个结果(共1个)。
第页1
n个整数分区的数目,其中n个分区的最大调整频率深度为。
+0 10
0, 1, 1, 1, 1, 3, 3, 1, 3, 7, 10, 17, 27, 38, 1, 4, 8, 17, 31, 52, 83, 122, 181, 257, 361, 499, 684, 910, 1211, 1595, 2060, 2663, 3406, 4315, 5426, 6784, 8417, 10466, 12824, 15721, 19104, 23267, 1, 5, 14, 36, 76, 143, 269, 446, 738, 1143, 1754, 2570, 3742, 5269
评论
如果整数分区为空,则整数分区的调整频率深度为0,否则为1加上必须使用多重数集才能达到单重数的次数。例如,分区(32211)调整了频率深度5,因为我们有:(32211)->(221)->(21)->(11)->(2)。通过调整频率深度对整数分区进行枚举,如下所示A325280型.Heinz数为n的整数分区的调整频率深度由下式给出A323014型n的整数分区的最大调整频率深度由下式给出A325282型.
例子
a(1)=1到a(11)=17分区:
1 11 21 211 221 411 3211 3221 3321 5221 4322
311 3111 4211 4221 5311 4331
2111 21111 32111 4311 6211 4421
5211 32221 5411
32211 33211 6221
42111 42211 6311
321111 43111 7211
52111 33221
421111 42221
3211111 43211
52211
53111
62111
431111
521111
4211111
32111111
数学
nn=30;
fdadj[ptn_List]:=如果[ptn=={},0,Length[NestWhileList[Sort[Length/@Split[#]]&,ptn,Length[#]>1&]]];
mfds=表格[Max@@fdadj/@IntegerPartitions[n],{n,nn}];
表[Length[Select[Integer Partitions[n],fdadj[#]==mfds[[n]]&]],{n,0,nn}]
交叉参考
囊性纤维变性。A011784号,2018年1月19日,A182850型,A182857号,A225486型,A323014型,A323023型,A325246型,A325258型,A325278型,A325281型,A325282型,A325283型.
搜索在0.004秒内完成
|