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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A327554型 第二个分区严格的n个两倍分区中的分区数。 4
0, 1, 3, 7, 15, 29, 60, 108, 201, 364, 643, 1106, 1944, 3253, 5493, 9183, 15161, 24727, 40559, 65173, 104963, 167747, 266452, 420329, 663658, 1036765, 1618221, 2514169, 3891121, 5992868, 9224213, 14107699, 21548428, 32798065, 49779331, 75301296, 113757367 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,3
链接
阿洛伊斯·海因茨,n=0..4000时的n,a(n)表
例子
a(3)=7=1+1+2+3计算3,21,2|1,1|1中的分区。
MAPLE公司
g: =proc(n)选项记忆`如果`(n=0,1,加上(g(n-j)*add(
`如果`(d::奇数,d,0),d=numtheory[除数](j)),j=1..n)/n)
结束时间:
b: =proc(n,i)选项记忆`如果`(n=0,[1,0],`如果`(i<1,0,
b(n,i-1)+(p->p+[0,p[1])(g(i)*b(n-i,min(n-i)))
结束时间:
a: =n->b(n$2)[2]:
seq(a(n),n=0..42);
数学
g[n_]:=g[n]=如果[n==0,1,和[g[n-j]和[If[OddQ[d],d,0],{d,除数[j]}],{j,1,n}]/n];
b[n_,i_]:=b[n,i]=如果[n==0,{1,0},如果[i<1,{0,0},b[n、i-1]+函数[p,p+{0,p[[1]]}][g[i]b[n-i,Min[n-i、i]]];
a[n]:=b[n,n][2]];
a/@范围[0,42](*Jean-François Alcover公司,2020年12月18日,之后阿洛伊斯·海因茨*)
交叉参考
关键字
非n
作者
阿洛伊斯·海因茨2019年9月16日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月23日10:29。包含371905个序列。(在oeis4上运行。)