%I#7 2016年8月31日05:31:04
%S 0,0,0,1,9,603682218134968401053885357688524624234,
%电话:1760211461306975716100784875878067030527366999040920,
%电话:576076132417251293043905647472132562308684489820251839
%N贝尔编号A000110(N)减去贝塞尔编号A006789(N)。
%H G.C.Greubel,n表,n=0..200时的a(n)</a>
%F a(n)=A000110(n)-A006789(n)。
%t nmax=50;m=稀疏数组[{{i_,i_}:>i,频带[{1,2}]->1,频带[[2,1}]->1},{nmax,nmax}];a[n_]:=矩阵幂[m,n][[1,1]];表[BellB[n]-a[n],{n,0,nmax}](*_G.C.Greubel_,2016年8月30日,使用来自A006789*的Jean-François Alcover_代码构建)
%Y参考A000110、A006789。
%K nonn公司
%O 0.6
%2009年1月2日,A_Omar E.Pol_
%E更多条款和第九条款修正,由_Dmitry Kamenetsky于2009年1月17日发布
|