编辑
经核准的
a(n)~c*(1+sqrt(2))^(2*n)/n^(3/2),其中c=0.06085708825649431003670031191332303648755519420440375-瓦茨拉夫·科特索维奇2021年10月7日
提出
b[n_,i_,m_]:=b[n,i,m]=如果[n==0,1,和[b[n-1,i-#+1,最大[m,j]-#]&@Max[0,最小[m-1,j]],{j,1,i}]];a[n]:=b[n,1,0];表[a[n],{n,0,30}](*Jean-François Alcover公司2017年7月10日,之后阿洛伊斯·海因茨*)
Alois P.Heinz,<a href=“/A279567型/b279567.txt“>n,a(n)表,n=0..400</a>
b: =proc(n,i,m)选项记忆`如果`(n=0,1,添加((h->
b(n-1,i-h+1,最大(m,j)-h)(最大(0,最小(m-1,j)),j=1..i))
结束时间:
a: =n->b(n,1,0):
seq(a(n),n=0..30)#阿洛伊斯·海因茨2017年2月23日
非n,更多,新的
a(10)-a(25)来自阿洛伊斯·海因茨2017年2月23日
1, 1, 2, 6, 21, 82, 343, 1509, 6893, 32419, 156058,765578,3815062,19263736,98368919,507197436,2637242188,13814247530,72834238423,386244387688,2058933104170,11026807340592,59304897232442,320181600386661,1734685419170666,9428340999504441