登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A241515型 n的分区数,使得(重数为1的部分数)是一个部分或(部分数>1)是一部分。 5
0, 1, 0, 1, 3, 5, 7, 12, 14, 21, 26, 37, 47, 69, 81, 114, 145, 194, 245, 329, 403, 537, 665, 853, 1055, 1358, 1649, 2096, 2551, 3182, 3887, 4816, 5800, 7174, 8646, 10536, 12680, 15434, 18398, 22272, 26578, 31900, 37949, 45433, 53751, 64125, 75774, 89800 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,5
链接
配方奶粉
a(n)+A241514型(n)=A000041号(n) 对于n>=0。
例子
a(6)统计这7个分区:51、42、411、321、3111、2211、21111。
数学
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}](*2014年2月15日*)
表[计数[f[n],p_/;MemberQ[p,u[p]]||MemberQ[p,Length[p]-Count[p,1]]],{n,0,z}](*A241515型*)
交叉参考
关键词
非n,容易的
作者
克拉克·金伯利2014年4月24日
状态
已批准

查找|欢迎|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月25日01:35 EDT。包含371964个序列。(在oeis4上运行。)