OFFSET
0,2
COMMENTS
Denominators are A001019. - Robert Israel, Jun 07 2018
LINKS
Robert Israel, Table of n, a(n) for n = 0..450
FORMULA
From Robert Israel, Jun 07 2018: (Start)
E.g.f.: exp(16*x-81*x^2).
a(n+2)=16*a(n+1)-162*(n+1)*a(n). (End)
MAPLE
f:= gfun:-rectoproc({-162*(x+1)*a(x) + 16*a(x+1)-a(x+2)=0, a(0)=1, a(1)=16}, a(x), remember):
map(f, [$0..50]); # Robert Israel, Jun 07 2018
MATHEMATICA
Numerator[Table[HermiteH[n, 8/9], {n, 0, 50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 02 2011*)
PROG
(PARI) a(n)=numerator(polhermite(n, 8/9)) \\ Charles R Greathouse IV, Jan 29 2016
CROSSREFS
KEYWORD
sign,frac
AUTHOR
N. J. A. Sloane, Nov 12 2009
STATUS
approved