OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A241506型 n的分区数,使得(具有多重数1的数部分)是一部分,(1的数部分)是一部分。 10
0, 1, 0, 1, 1, 1, 2, 3, 5, 7, 11, 12, 17, 25, 32, 40, 54, 73, 95, 123, 152, 195, 252, 319, 395, 491, 624, 759, 951, 1167, 1446, 1767, 2147, 2631, 3212, 3881, 4684, 5672, 6848, 8215, 9825, 11809, 14070, 16818, 19957, 23737, 28169, 33377, 39357, 46546, 54814 (列表;图表;参考;;历史;文本;内部格式)
抵消
0.7
链接
公式
a(n)+A241507型(n)+A241508型(n)=A241510型(n) 对于n>=0。
例子
a(6)对这两个分区进行计数:512211。
数学
z=52;f[n_]:=f[n]=整数分区[n];u[p_]:=长度[DeleteDuplicates[Select[p,Count[p,#]==1&]]];
表[计数[f[n],p_/;成员Q[p,u[p]]和成员Q[p,计数[p,1]],{n,0,z}](*A241506型*)
表[Count[f[n],p_/!成员Q[p,u[p]]和成员Q[p,计数[p,1]],{n,0,z}](*A241507型*)
表[计数[f[n],p_/;成员Q[p,u[p]]&&!成员Q[p,计数[p,1]]],{n,0,z}](*A241508型*)
表[Count[f[n],p_/!成员Q[p,u[p]]&&!成员Q[p,计数[p,1]]],{n,0,z}](*A241509型*)
表[计数[f[n],p_/;成员Q[p,u[p]]||成员Q[p,计数[p,1]],{n,0,z}](*A241510型*)
交叉参考
囊性纤维变性。A241507型A241508型A241509型A241510型.
关键词
非n容易的
作者
克拉克·金伯利2014年4月24日
状态
经核准的

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

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

上次修改时间:2024年5月28日15:56 EDT。包含372916个序列。(在oeis4上运行。)