A397738 - OEIS

%I #15 Jul 08 2026 15:34:41

%S 5,6,8,6,5,6,6,2,7,0,4,8,2,8,7,9,5,0,9,8,6,4,2,2,8,8,6,3,2,2,3,5,3,2,

%T 7,4,3,0,2,6,7,7,8,2,7,2,5,5,5,5,8,7,3,8,1,1,1,1,9,5,2,9,8,9,8,2,7,9,

%U 2,4,3,4,3,6,5,8,0,3,3,1,1,8,8,7,8,1,5,7,1,5,9,1,8,6,5,0,8,3,4,3

%N Decimal expansion of the Struve H-function of order 0 at 1.

%H M. Abramowitz and I. A. Stegun, <a href="https://personal.math.ubc.ca/~cbm/aands/page_496.htm">Handbook of Mathematical Functions</a>, Chapter 12.

%H Michael I. Shamos, <a href="https://euro.ecom.cmu.edu/people/faculty/mshamos/cat.pdf">A catalog of the real numbers</a>, (2007). See p. 484.

%H Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/StruveFunction.html">Struve Function</a>.

%F Equals (2/Pi)*Sum_{k>=0} (-1)^k/((2*k+1)!!)^2.

%F Equals A060294*A395062.

%F Equals A333566/Pi. - _Hugo Pfoertner_, Jul 08 2026

%e 0.568656627048287950986422886322353274302677827...

%p evalf[120](StruveH(0, 1));  # _Alois P. Heinz_, Jul 08 2026

%t RealDigits[StruveH[0, 1], 10, 100][[1]]

%Y Cf. A001147, A001818, A060294, A197037, A333566, A395062.

%K nonn,cons,easy,new

%O 0,1

%A _Stefano Spezia_, Jul 08 2026