%I#14 2022年9月8日08:45:43
%S 1,4823021103045280782559500812071752584576412983936,
%电话:27498818692752131072068950912062419614359968224,
%电话2969927075488292352141183268107518731968605518619349180118016318194128757965158633600
%N a(N)=Hermite(N,24)。
%C第一个负项是a(304)_乔治·菲舍尔(Georg Fischer),2019年2月16日
%H G.C.Greubel,n表,n=0..650时的a(n)</a>
%F From _G.C.Greubel,2018年7月13日:(开始)
%F例如:exp(48*x-x^2)。
%F a(n)=48*a(n-1)-2*(n-1。(结束)
%t HermiteH[范围[0,20],24](*哈维·P·戴尔,2011年8月10日*)
%t具有[{nmax=50},系数列表[Series[Exp[48*x-x^2],{x,0,nmax}],x]*Range[0,nmax]!](*_G.C.格鲁贝尔,2018年7月13日*)
%o(岩浆)m:=30;R<x>:=PowerSeriesRing(基本原理(),m);b: =系数(R!(Exp(48*x-x^2));[阶乘(n-1)*b[n]:n in[1..m]];//_G.C.Greubel,2018年7月13日
%o(PARI)x='x+o('x^30);Vec(塞拉普拉斯(exp(48*x-x^2)))\\_G.C.格鲁贝尔,2018年7月13日
%o(PARI),(n=0,30,print1(polhermite(n,24),“,”))\\_G.C.Greubel_,2018年7月13日
%K符号
%0、2
%A _N.J.A.Sloane,2009年11月11日
|