%我#2022年9月8日08:45:03
%S 1,2,2,-4,-20,-8184464,-1648,-107208230848280768,-4978816,
%电话:17257600104891648727511296,电话:1901510144,电话:2853840435211377556480,
%电话:11072144783361759326697472,电话:-42984354695168,电话:-1633799084079104
%N(有符号)三角形A060821的行和(Hermite多项式)。
%H G.C.Greubel,n表,n=0..730时的a(n)</a>
%H<a href=“/index/He#Hermite”>与Hermite多项式相关序列的索引项</a>
%F a(n)=和{m=0..n}A060821(n,m)=H(n,1),带有Hermite多项式H(n、x)。
%F例如:exp(-x*(x-2))。
%F a(n)=2*(a(n-1)-(n-1)*a(n-2))_罗杰·巴古拉(Roger L.Bagula),2006年9月11日
%F a(n)=2^n*U(-n/2,1/2,1),其中U是合流超几何函数_Benedict W.J.Irwin,2017年10月17日
%例如:产品{k>=1}((1+x^k)/(1-x^k))^(mu(k)/k)_伊利亚·古特科夫斯基,2019年5月26日
%p A062267:=程序(n)
%p HermiteH(n,1);
%p简化(%);
%p结束程序:#_R.J.Mathar_,2013年2月5日
%t lst={};Do[p=HermiteH[n,1];附加到[lst,p],{n,0,5!}];第1期(*_Vladimir Joseph Stephan Orlovsky,2009年6月15日*)
%t表[2^n超几何U[-n/2,1/2,1],{n,0,23}](*_Benedict W.J.Irwin_,2017年10月17日*)
%t具有[{nmax=50},系数列表[Series[Exp[x*(2-x)],{x,0,nmax}],x]*范围[0,nmax]!](*_G.C.Greubel_,2018年6月8日*)
%o(Python)
%o来自sympy import hermite,Poly
%o def a(n):返回和(Poly(hermite(n,x),x).all_coeffs())#_Indranil Ghosh,2017年5月26日
%o(PARI)x='x+o('x^30);Vec(serlaplace(exp(-x*(x-2)))\\_G.C.Greubel_,2018年6月8日
%o(PARI)a(n)=坡缕石(n,1);\\_米歇尔·马库斯,2018年6月9日
%o(岩浆)m:=30;R<x>:=PowerSeriesRing(基本原理(),m);b: =系数(R!(Exp(x*(2-x)));[阶乘(n-1)*b[n]:n in[1..m]];//_G.C.Greubel_,2018年6月8日
%Y参考A000898,A121966。
%K符号,简单
%0、2
%A Wolfdieter Lang,2001年6月19日