搜索: 编号:a241514
|
|
A241514型
|
| n的分区数,使得(重数为1的部分数)不是一个部分,并且(部分数>1)不是一部分。 |
|
+0 5
|
|
|
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(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]]和成员Q[p,长度[p]-计数[p,1]],{n,0,z}](*A241512型*)
表[计数[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_/;成员Q[p,u[p]]||MemberQ[p,Length[p]-Count[p,1]]],{n,0,z}](*A241515型*)
|
|
交叉参考
|
|
|
关键词
|
非n,容易的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.005秒内完成
|