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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A237666型 包含一对连续整数的n的分区数。
0, 0, 0, 1, 1, 3, 3, 7, 9, 15, 20, 32, 40, 61, 78, 112, 142, 199, 250, 341, 428, 568, 710, 930, 1151, 1486, 1835, 2334, 2868, 3615, 4413, 5513, 6706, 8298, 10052, 12359, 14895, 18195, 21857, 26526, 31747, 38337, 45702, 54923, 65272, 78062, 92481, 110168, 130089 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,6
链接
瓦茨拉夫·科特索维奇,n=0..10000时的n,a(n)表(Alois P.Heinz的条款0..1000)
配方奶粉
a(n)~exp(Pi*sqrt(2*n/3))/(4*sqert(3)*n)-瓦茨拉夫·科特索维奇2022年1月28日
猜想:对于n>0,a(n)=A000041号(n)-A116931号(n) ●●●●-瓦茨拉夫·科特索维奇2022年1月28日
例子
8的合格分区是521、431、332、421、3221、32111、222111、2111111,因此a(8)=9。
MAPLE公司
g: =proc(n,i)选项记忆`如果`(n=0,1,
`如果`(i<1,0,加上(g(n-i*j,i-1),j=0..n/i))
结束时间:
b: =proc(n,i,l)选项记忆`如果`(n=0或i<1,0,
b(n,i-1,0)+加法(‘if’(i+1=l,g(n-i*j,i-1),
b(n-i*j,i-1,i)),j=1..n/i))
结束时间:
a: =n->b(n$2,0):
seq(a(n),n=0..60)#阿洛伊斯·海因茨2014年2月14日
数学
映射[Length[Cases[Map[Differences[DeleteDuplicates[#]]&,Integer Partitions[#]],{___,-1,___}]&,Range[50]](*彼得·J·C·摩西2014年2月9日*)
g[n_,i_]:=g[n,i]=如果[n==0,1,如果[i<1,0,和[g[n-i*j,i-1],{j,0,n/i}]];b[n_,i_,l]:=b[n,i,l]=如果[n==0||i<1,0,b[n、i-1,0]+和[i+1==l,g[n-i*j,i-1],b[n-i*j,i-1,i]],{j,1,n/i}]];a[n]:=b[n,n,0];表[a[n],{n,0,60}](*Jean-François Alcover公司2016年9月1日之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A116931号,A237665型.
关键字
非n,容易的
作者
克拉克·金伯利2014年2月11日
状态
经核准的

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

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

上次修改时间:2024年4月23日16:28 EDT。包含371916个序列。(在oeis4上运行。)