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

 


A118096号
n的分区数,使最大部分是最小部分的两倍。
32
0, 0, 1, 1, 2, 3, 3, 4, 6, 6, 6, 10, 9, 11, 13, 14, 15, 20, 18, 23, 25, 27, 27, 37, 35, 39, 43, 48, 49, 61, 57, 68, 72, 78, 81, 97, 95, 107, 114, 127, 128, 150, 148, 168, 179, 191, 198, 229, 230, 254, 266, 291, 300, 338, 344, 379, 398, 427, 444, 498, 505, 550, 580, 625
抵消
1,5
评论
还有n的分区数,如果最大部分出现k次,则部分数为2k。例如:a(8)=4,因为我们有[7,1]、[6,2]、[5,3]和[3,3,1]。
链接
阿洛伊斯·海因茨,n=1..1000时的n,a(n)表
配方奶粉
通用公式:和{k>=1}x^(3*k)/产品{j=k..2*k}(1-x^j)。
例子
a(8)=4,因为我们有[4,2,2]、[2,2,2,1,1]、[2,2,1,1]和[2,1,1,1,1]。
MAPLE公司
g: =总和(x^(3*k)/乘积(1-x^j,j=k..2*k),k=1..30):gser:=系列(g,x=0,75):seq(系数(gser,x,n),n=1..70);
#第二个Maple项目:
b: =proc(n,i,t)选项记住:`if`(n=0,1,`if`)(i<t,0,
b(n,i-1,t)+`如果`(i>n,0,b(n-i,i,t)))
结束时间:
a: =n->添加(b(n-3*j,2*j,j),j=1..n/3):
seq(a(n),n=1..64)#阿洛伊斯·海因茨2017年9月4日
数学
表[Count[Integer Partitions[n],p_/;2分钟[p]==最大[p]],{n,40}](*克拉克·金伯利2014年2月16日*)
(*第二个节目:*)
b[n_,i_,t_]:=b[n,i,t]=如果[n==0,1,如果[i<t,0,
b[n,i-1,t]+如果[i>n,0,b[n-i,i,t]]];
a[n]:=总和[b[n-3j,2j,j],{j,1,n/3}];
数组[a,64](*Jean-François Alcover公司,2021年6月4日,之后阿洛伊斯·海因茨*)
黄体脂酮素
(PARI)我的(N=70,x='x+O('x^N));concat([0,0],Vec(总和(k=1,N,x^(3*k)/prod(j=k,2*k,1-x^j))\\Seiichi Manyama先生2023年5月14日
关键字
非n
作者
Emeric Deutsch公司2006年4月12日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日15:24。包含376087个序列。(在oeis4上运行。)