登录

修订历史记录238788英镑

(粗体、蓝色下划线文本是附加;褪色的红色下划线文本是删除.)

显示所有更改。
n的回文分区数,其最小部分的重数小于等于2。
(历史;已发布版本)
#4通过N.J.A.斯隆美国东部时间2014年3月12日星期三12:57:35
状态

提出

经核准的

#3通过克拉克·金伯利2014年3月12日星期三10:15:49 EDT
状态

编辑

提出

#2通过克拉克·金伯利2014年3月5日星期三11:46:00 EST
名称

分配 对于 克拉克 金伯利编号 属于 回文的 分区 属于 n个 谁的 最少的 部分 多重性 <= 2.

数据

1, 2, 1, 3, 3, 4, 4, 7, 6, 11, 9, 13, 15, 22, 18, 29, 28, 40, 38, 55, 52, 75, 70, 97, 96, 133, 123, 173, 167, 225, 215, 291, 282, 380, 361, 479, 468, 619, 590, 780, 757, 986, 952, 1239, 1202, 1555, 1500, 1931, 1882, 2409, 2328, 2975, 2898, 3676, 3568, 4517

抵消

1,2

评论

回文分区定义为A025065型.

例子

a(8)统计这7个分区(写为回文):8、161、44、242、323、1331、12221

数学

z=40;p[n_,k_]:=选择[IntegerPartitions[n],(计数[OddQ[Transpose[Tally[#]][2]]],True]<=1)&&(计数[#,最小[#]]<=k)&]

表[p[n,2],{n,1,12}]

t2=表格[长度[p[n,2]],{n,1,z}](*238788英镑*)

表[p[n,3],{n,1,12}]

t3=表格[长度[p[n,3]],{n,1,z}](*A238789型*)

表[p[n,4],{n,1,12}]

t4=表格[长度[p[n,4]],{n,1,z}](*A238790型*)

(*彼得·J·C·摩西2014年3月3日*)

交叉参考
关键词

分配

非n,容易的

作者

克拉克·金伯利2014年3月5日

状态

经核准的

编辑

#1通过克拉克·金伯利美国东部时间2014年3月5日星期三09:05:53
名称

分配给克拉克·金伯利

关键词

分配

状态

经核准的