A158513 a(n) = Hermite(n,5).

1, 10, 98, 940, 8812, 80600, 717880, 6211600, 52065680, 421271200, 3275529760, 24329873600, 171237081280, 1128453846400, 6832374350720, 36727035808000, 162299127558400, 447726129728000, -1040909039705600, -26527231067264000, -225717767163827200

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..725

Formula

E.g.f.: exp(10*x - x^2). - G. C. Greubel, Jul 12 2018

Mathematica

Table[HermiteH[n, 5], {n, 0, 50}] (* G. C. Greubel, Jul 12 2018 *)

Prog

(Magma) m:=30; R<x>:=PowerSeriesRing(Rationals(), m); b:=Coefficients(R!(Exp(10*x - x^2))); [Factorial(n-1)*b[n]: n in [1..m]]; // G. C. Greubel, Jul 12 2018
(PARI) x='x+O('x^30); Vec(serlaplace(exp(10*x - x^2))) \\ G. C. Greubel, Jul 12 2018
(PARI) a(n) = polhermite(n, 5); \\ Michel Marcus, Jul 13 2018

Crossrefs

Sequence in context: A264462 A198968 A125946 * A125880 A125445 A163446

Adjacent sequences: A158510 A158511 A158512 * A158514 A158515 A158516

Keyword

sign

Author

N. J. A. Sloane, Nov 11 2009

Status

approved