|
%I #33 Sep 26 2023 12:13:13
%S 1,9,9,9,9,0,9,9,9,7,9,1,8,9,4,7,5,7,6,7,2,6,6,4,4,2,9,8,4,6,6,9,0,4,
%T 4,4,9,6,0,6,8,9,3,6,8,4,3,2,2,5,1,0,6,1,7,2,4,7,0,1,0,1,8,1,7,2,1,6,
%U 5,2,5,9,4,4,4,0,4,2,4,3,7,8,4,8,8,8,9,3,7,1,7,1,7,2,5,4,3,2,1
%N Decimal expansion of e^Pi - Pi.
%C Sum_{k>=0} A176696(k)/(2^k*k!)= e^Pi - Pi. - _Jaume Oliver Lafont_, Apr 24 2010
%D J. H. Conway, personal communication.
%H Harry J. Smith, <a href="/A018938/b018938.txt">Table of n, a(n) for n = 2..20000</a>
%H Robert Munafo, <a href="https://mrob.com/pub/ries/index-5.html#pi_day">Pi Day: the Second Approximation</a>, RIES - Find Algebraic Equations, Given Their Solution.
%H Randall Munroe, <a href="https://xkcd.com/217/">e to the pi Minus pi</a>, xkcd Web Comic #217, Jan 31 2007.
%H Simon Plouffe, <a href="http://www.plouffe.fr/simon/constants/exppipi.txt">exp(Pi)-Pi to 10000 digits</a>
%H Simon Plouffe, <a href="http://www.worldwideschool.org/library/books/sci/math/MiscellaneousMathematicalConstants/chap31.html">exp(Pi)-Pi to 2000 digits</a>
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Gelfond%27s_constant">Gelfond's constant</a>.
%e 19.99909997918947576726644298466904449606893684322510617247010181721652...
%p evalf(exp(Pi)-Pi, 140); # _Alois P. Heinz_, Sep 26 2023
%t RealDigits[E^Pi-Pi,10,120][[1]] (* _Harvey P. Dale_, Mar 09 2014 *)
%o (PARI) { default(realprecision, 20080); x=(exp(1)^Pi-Pi)/10; for (n=2, 20000, d=floor(x); x=(x-d)*10; write("b018938.txt", n, " ", d)); } \\ _Harry J. Smith_, May 14 2009
%Y Cf. A018939 (continued fraction), A176696.
%K nonn,cons
%O 2,2
%A _N. J. A. Sloane_
|
