A158532 a(n) = Hermite(n,9).

1, 18, 322, 5724, 101100, 1774008, 30921144, 535292496, 9202368912, 157077960480, 2661760648224, 44770132458432, 747303649990848, 12376982520832896, 203355790475230080, 3313848717970820352, 53548603209217863936, 857831698790855299584

Offset

0,2

Links

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

Formula

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

Mathematica

Table[HermiteH[n, 9], {n, 0, 30}] (* G. C. Greubel, Jul 13 2018 *)

Prog

(Magma) m:=30; R<x>:=PowerSeriesRing(Rationals(), m); b:=Coefficients(R!(Exp(18*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(18*x - x^2))) \\ G. C. Greubel, Jul 12 2018
(PARI) for(n=0, 30, print1(polhermite(n, 9), ", ")) \\ G. C. Greubel, Jul 13 2018

Crossrefs

Sequence in context: A321511 A208537 A292299 * A214995 A171323 A049660

Adjacent sequences: A158529 A158530 A158531 * A158533 A158534 A158535

Keyword

sign

Author

N. J. A. Sloane, Nov 11 2009

Status

approved