login
A144142
a(n) = Hermite(n,3).
1
1, 6, 34, 180, 876, 3816, 14136, 39024, 36240, -406944, -3093984, -10425024, 5517504, 283305600, 1556378496, 1405714176, -38257069824, -274525272576, -346411261440, 7804442244096, 59990281399296, 47763998631936, -2233007826978816, -15499662901678080
OFFSET
0,2
LINKS
FORMULA
E.g.f.: exp(6*x - x^2). - G. C. Greubel, Jul 12 2018
MATHEMATICA
lst={}; Do[AppendTo[lst, HermiteH[n, 3]], {n, 0, 7^2}]; lst
HermiteH[Range[0, 30], 3] (* Harvey P. Dale, Dec 11 2015 *)
PROG
(PARI) for(n=0, 30, print1(polhermite(n, 3), ", ")) \\ G. C. Greubel, Jul 12 2018
(Magma) [(&+[(-1)^k*Factorial(n)*(6)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]]): n in [0..30]]; // G. C. Greubel, Jul 12 2018
CROSSREFS
Sequence in context: A266359 A198765 A274405 * A126643 A320745 A084775
KEYWORD
sign
AUTHOR
EXTENSIONS
Offset corrected by Alois P. Heinz, Oct 23 2015
STATUS
approved