提出

经核准的

编辑

提出

分配编号 属于 分区 属于 n个 这样的 那个(数 部分 有 多重性 1)是 不 一 部分 和(数 属于 部分>1)是 对于不 克拉克一 金伯利部分.

1, 0, 2, 2, 2, 2, 4, 3, 8, 9, 16, 19, 30, 32, 54, 62, 86, 103, 140, 161, 224, 255, 337, 402, 520, 600, 787, 914, 1167, 1383, 1717, 2026, 2549, 2969, 3664, 4347, 5297, 6203, 7617, 8913, 10760, 12683, 15225, 17828, 21424, 25009, 29784, 34954, 41414, 48274

0,3

a（n）+A241515型（n）=A000041号（n） 对于n>=0。

a（6）统计这4个分区：6、33、222、111111。

z=30；f[n_]：=f[n]=整数分区[n]；u[p_]：=长度[DeleteDuplicates[Select[p，Count[p，#]==1&]]]；

表[计数[f[n]，p_/；成员Q[p，u[p]]和成员Q[p，长度[p]-计数[p，1]]，{n，0，z}](*A241511型*)

表[Count[f[n]，p_/！成员Q[p，u[p]]&&MemberQ[p，Length[p]-Count[p，1]]]，｛n，0，z｝](*2012年2月15日*)

表[计数[f[n]，p_/；成员Q[p，u[p]]&&！成员Q[p，长度[p]-计数[p，1]]，{n，0，z}](*A241513型*)

表[Count[f[n]，p_/！成员Q[p，u[p]]&&！成员Q[p，长度[p]-计数[p，1]]，{n，0，z}](*A241514型*)

表[计数[f[n]，p_/；MemberQ[p，u[p]]||MemberQ[p，Length[p]-Count[p，1]]]，{n，0，z}](*A241515型*)

囊性纤维变性。A241506型，A241511型，A241511型，A241512型，A241513型，A241515型.

分配

非n，容易的

克拉克·金伯利2014年4月24日

经核准的

编辑

分配给克拉克·金伯利

分配

经核准的