The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #34 Jan 04 2025 23:22:07
%S 6,1,6,5,0,5,4,8,5,6,2,0,7,1,6,2,3,3,7,9,7,1,1,0,4,0,4,1,0,0,1,7,2,7,
%T 4,7,5,3,9,4,9,5,8,9,8,1,8,1,6,6,5,3,3,0,5,7,2,1,2,0,7,2,1,1,2,4,7,5,
%U 3,1,5,9,7,7,4,9,5,4,0,3,3,9,5,6,1,6,4,5,6,1,6,9,0,3,4,0,3,0,1,2,5,0,3,4,1
%N Decimal expansion of the smallest positive root of the Cosine Integral function.
%D Jerome Spanier and Keith B. Oldham, "Atlas of Functions", Hemisphere Publishing Corp., 1987, chapter 38, page 365.
%H Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/CosineIntegral.html">Cosine Integral</a>.
%e 0.61650548562071623379711040410017274753949589818...
%t x0 = x /. FindRoot[ CosIntegral[x], {x, 1}, WorkingPrecision -> 110]; RealDigits[x0][[1]][[1 ;; 105]]
%Y Cf. A133746.
%K nonn,cons
%O 0,1
%A _Stefano Spezia_, Jan 04 2025