登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志

请做一个捐款保持OEIS运行。我们现在已经第五十五岁了。在过去的一年里,我们增加了12000个新的序列,达到了8000个。引文(常说“感谢OEIS”)。我们需要筹集资金雇人管理提交,这将减少我们编辑的负担,加快编辑。
其他方式捐赠

提示
问候整数序列的在线百科全书!)
A24954 n的划分数p(p的不同部分的数目)<max(p)-min(p)。
0, 0, 0,0, 0, 1,2, 4, 6,12, 17, 26,38, 54, 76,107, 142, 192,259, 337, 443,577, 743, 948,1213, 1532, 1935,2427, 3031, 3765,4681, 5762, 7097,8704, 10644, 12966,8704, 10644, 12966,γ,γ,γ 列表图表参考文献历史文本内部格式
抵消

0. 7

链接

n,a(n)n=0…47的表。

公式

A(n)+A2499 58(n)=A000 000 41(n)n>=0。

例子

A(7)对这4个分区进行计数:61, 52, 511、1111111。

Mathematica

Z=60;D [Py]:= D[P]=长度[DeleDeDealPosial[P] ];F[PY]:= F[P] = Max [P] -MI[P];g[n]:= G[n] =整数分割[n];

表[g[n],p[/d] [p]<f[p] ],{n,0,z }(*)A24954*)

表[g[n],p[/d] [p] <=f[p],{n,0,z }](*)A24955*)

表[计数[g[n],p[/d] [p]=f[p] ],{n,0,z }(*)A24956*)

表[g[n],p[/d] [p]>f[p],{n,0,z }(*)A034*)

表[计数[g[n],p[/d] [p]>f[p],{n,0,z }]A2499 58*)

交叉裁判

囊性纤维变性。A24955A24956A034A2499 58.

语境中的顺序:A326438 A023099 A018189*A96505 A32583 A167706

相邻序列:A24951 A24952 A24953*A24955 A24956 A24957

关键词

诺恩容易

作者

克拉克·金伯利3月30日2014

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改了12月10日04:15 EST 2019。包含329885个序列。(在OEIS4上运行)