OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..380
Eric Weisstein's World of Mathematics, Hermite Polynomial
Wikipedia, Hermite polynomials
FORMULA
a(n) ~ c * 2^n * n! / (log(2))^n, where c = 1/(2 * log(2) * exp(log(2)^2/4)) = 0.639705404891769467944095575437073306645289161842121830191257596548619914238... - Vaclav Kotesovec, Jul 13 2018, updated Apr 21 2024
MATHEMATICA
Table[Sum[HermiteH[n, k - 1]/2^k, {k, 1, Infinity}], {n, 0, 20}]
PROG
(PARI) for(n=0, 40, print1(if(n==0, 1, ceil(sum(k=1, 15*n, polhermite(n, k-1)/2^k))), ", ")) \\ G. C. Greubel, Jul 13 2018
(PARI) nmax = 40; p = floor(2*log(nmax!*(2/log(2))^nmax)/log(10)); default(realprecision, p); a(n) = round(suminf(k=1, polhermite(n, k-1)/2^k));
for(n=0, nmax, print1(a(n), ", ")); \\ Michel Marcus and Vaclav Kotesovec, Jul 13 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Reshetnikov, Oct 11 2016
STATUS
approved