登录
A238787型
最大部分重数<=4的n的回文分区数。
1, 2, 2, 4, 3, 6, 6, 11, 11, 17, 18, 27, 28, 41, 42, 62, 63, 90, 91, 129, 131, 183, 185, 255, 257, 351, 354, 480, 484, 647, 652, 867, 873, 1152, 1159, 1520, 1529, 1990, 2001, 2591, 2605, 3352, 3369, 4316, 4336, 5526, 5550, 7042, 7071, 8931, 8967, 11284
抵消
1,2
评论
回文分区定义为A025065型.
例子
a(8)统计这11个分区(写为回文):8、161、44、242、11411、323、1331、2222、12221、112211、1112111。
数学
z=40;p[n_,k_]:=选择[IntegerPartitions[n],(计数[OddQ[Transpose[Tally[#]][2]],True]<=1)&&(计数[#,最大[#]]<=k)&]
表[p[n,1],{n,1,12}]
t2=表格[长度[p[n,2]],{n,1,z}](*A238785型*)
表[p[n,3],{n,1,12}]
t3=表格[长度[p[n,3]],{n,1,z}](*A238786型*)
表[p[n,4],{n,1,12}]
t4=表格[长度[p[n,4]],{n,1,z}](*A238787型*)
(*彼得·J·C·摩西2014年3月3日*)
关键词
非n,容易的
作者
克拉克·金伯利2014年3月5日
状态
经核准的