%I #5 Dec 18 2016 13:50:29
%S 0,1,1,1,2,2,2,3,3,3,3,4,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6,6,7,7,7,7,7,7,
%T 7,8,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9,9,10,10,10,10,10,10,10,10,10,
%U 10,11,11,11,11,11,11,11,11,11,11,11,11,12,12,12,12,12,12,12,12,12,12,12,12
%N a(n) is the greatest zero of Hermite polynomial H(n,x) to nearest integer
%D M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), p. 801.
%H M. Abramowitz and I. A. Stegun, eds.,<a href="http://apps.nrbook.com/abramowitz_and_stegun/index.html"> Handbook of Mathematical Functions</a>, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
%H <a href="/index/He#Hermite">Index entries for sequences related to Hermite polynomials</a>
%F HermiteH(0,x) = 1, HermiteH(1,x) = 2*x,HermiteH(n,x) = 2*x*HermiteH(n-1,x) - 2*(n-1)*HermiteH(n-2,x), for n>1.
%e H(1,x) = 2x , a(1) = 0 ; H(2,x) = 4*x^2 - 2, a(2) = 1, etc.
%p for p from 2 to 1000 do; a:= realroot( expand(HermiteH(p,x)), 1/1000000); print (a);od;
%K nonn
%O 0,5
%A _Michel Lagneau_, Jan 30 2010