登录
平面分区的INVERT变换。
4

%I#23 2021年8月22日14:10:20

%S 1,1,4,13,441444781573519317118564571861536138652024192,

%电话:6674843220103137257938229333132378919839526023918538581422014,

%电话:282973521949331089465430769391031610146247481613345738571611032617200336380201398917

%平面分区的N INVERT变换。

%H Alois P.Heinz,n的表格,n=0..1930的a(n)</a>

%F a(n)=和{k=0..n}A257673(n,k)。

%F a(n)~c*d^n,其中d=3.29751325031267233368362612669965143954380629689332811462016186843…,c=0.37138834194450884440003611838957085571414712460227707501762842135。-_Vaclav Kotesovec_,2015年5月19日

%F G.F.:1/(2-产品{k>=1}1/(1-x^k)^k)。-Ilya Gutkovskiy_,2018年10月18日

%p g:=proc(n)选项记忆;`if`(n=0,1,添加(

%p g(n-j)*数值[σ][2](j),j=1..n)/n)

%p端:

%p a:=proc(n)选项记忆;`if`(n=0,1,

%p加(a(n-i)*g(i),i=1..n))

%p端:

%p序列(a(n),n=0..36);

%tg[n_]:=g[n]=如果[n==0,1,和[g[n-j]除数Sigma[2,j],{j,1,n}]/n];

%t a[n]:=a[n]=如果[n==0,1,和[a[n-i]g[i],{i,1,n}]];

%t表[a[n],{n,0,36}](*_Jean-François Alcover_,2021年8月22日,在_Alois P.Heinz_*之后)

%Y行总和为A257673。

%Y参考A000219。

%K nonn公司

%0、3

%A _Alois P.Heinz_,2015年5月3日