%I M1498#30 2020年1月25日17:59:03
%S 1,1,2,5,16,663432167161931409141494716258868211935996,
%电话:31058285605074831006891813896164318287966027343399145502051200,
%电话:950580374336797124606455679655468976744691344806532086519547483974052648671409470892058148
%N在Stirling2变换下左移2位。
%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
%H Alois P.Heinz,n的表格,n=1..150的a(n)</a>
%H M.Bernstein和N.J.A.Sloane,<A href=“http://arXiv.org/abs/math.CO/0205301“>整数的一些规范序列,线性算法应用,226-228(1995),57-72;勘误表320(2000),210。[链接到arXiv版本]
%H M.Bernstein和N.J.A.Sloane,<A href=“/A003633/A003633_1.pdf”>整数的一些正则序列,线性算法。应用,226-228(1995),57-72;勘误表320(2000),210。[链接到Lin.Alg.Applic.version以及省略的数字]
%H N.J.A.斯隆,<A href=“/transforms.txt”>转换</a>
%p触发器:=进程(p)
%p程序(n)添加(p(k)*箍筋2(n,k),k=0..n)结束
%p端:
%p a:=proc(n)选项记忆`如果`(n<3,1,aa(n-2))结束:
%p aa:=搅拌(a):
%p序列(a(n),n=1..25);#_Alois P.Heinz,2012年6月22日
%t stirtr[p_]:=函数[{n},和[p[k]*StirlingS2[n,k],{k,0,n}]];a[n_]:=a[n]=如果[n<3,1,aa[n-2];aa=搅拌棒[a];表[a[n],{n,1,24}](*_Jean-François Alcover_,2013年1月9日,翻译自_Alois P.Heinz的Maple程序*)
%K non,nice,eigen
%O 1,4型
%A _N.J.A.斯隆_