PROG
(MAGMA) [(&+[(-1)^k*Factorial(n)*(4)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]]): n in [0..30]]; // G. C. Greubel, Jul 10 2018
(MAGMA) [(&+[(-1)^k*Factorial(n)*(4)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]]): n in [0..30]]; // G. C. Greubel, Jul 10 2018
reviewed
proposed
editing
(PARI) for(n=0, 50, print1(polhermite(n, 2), ", )) \\ G. C. Greubel, Jul 10 2018
approved
editing
a(n) = HermiteH(n,2).
approved
editing
a(n) = HermiteH[n,2].
1, 4, 14, 40, 76, -16, -824, -3104, -880, 46144, 200416, -121216, -4894016, -16666880, 60576896, 708980224, 1018614016, -18612911104, -109084520960, 233726715904, 5080118660096, 10971406004224, -169479359707136
proposed