%I#26 2022年6月22日14:44:43
%S 1,52032114742135971382958545682076806159474869816156751,
%电话:4459588692948052895457170479360599989384846749014511809332450147,
%电话:16295958928460076067647281473819714729894818339975525681317
%N每三分之一钟号A000110。
%F a(n)=潜水钟(3*n)=A000110(3*n)_Vladeta Jovovic_,2003年2月2日
%F a(n)=经验(-1)*和{k>=0}k^(3n)/k!。
%例如:exp(x*(d_z)^3)*(exp(exp)(z)-1))|_{z=0},带有导数算子d_z:=d/dz。改编自A000110中给出的1999年C.M.Bender参考的等式(14)和(15)。
%例如:exp(-1)*Sum_{n>=0}exp(n^3*x)/n!.-_Vladeta Jovovic_,2006年8月24日
%t表[BellB[3*n],{n,0,12}](*_Jean-François Alcover_,2012年12月13日*)
%t BellB[3*范围[0,15](*Harvey P.Dale_,2020年4月19日*)
%o(PARI)表示(n=0,50,打印1(四舍五入(总和(i=01000,i^(3*n)/(i)!)/exp(1),“,”)
%o(Sage)[bell_number(3*n)for n in range(0,13)]#_Zerinvary Lajos_,2009年5月14日
%o(Python)
%o从itertools导入累加,islice
%o def A070906_gen():#术语生成器
%o产量1
%o blist,b=(1,),1
%o为True时:
%对于范围(3)中的_,为o:
%o blist=列表(累加(blist,初始=(b:=blist[-1]))
%o产量b
%o A070906_list=list(岛屿(A070906-gen(),30))#_Chai Wah Wu_,2022年6月22日
%Y参考A000110、A020557。
%K容易,不是
%0、2
%2002年5月19日,A _贝尼特·克洛伊特
|