检验过的
经核准的
提出
编辑
g[n_]:=g[n]=如果[n==0,1,总和[g[n-j]*
除数Sigma[2,j],{j,1,n}]/n];
b[n_,k_]:=b[n,k]=如果[k<2,g[n+1],其中[{q=商[k,2]},
求和[b[j,q]b[n-j,k-q],{j,0,n}]];
a[n]:=b[n,n];
表[a[n],{n,0,22}](*Jean-François Alcover公司,2021年8月23日,之后阿洛伊斯·海因茨*)
a(n)=[x^(2*n)](-1+产品{k>=1}1/(1-x^k)^k)-伊利亚·古特科夫斯基2021年2月13日
囊性纤维变性。A000219号,A257673型.