A063503 Continued fraction for e^Pi - Pi^e (A063504 = A039661 - A059850).

0, 1, 2, 7, 7, 6, 2, 1, 6, 2, 5, 7, 1, 3, 1, 1, 6, 1, 1, 1, 1, 1, 2, 1, 11, 5, 6, 2, 1, 124, 1, 4, 2, 1, 1, 3, 18, 1, 1, 1, 1, 17, 1, 2, 10, 1, 1, 1, 2, 2, 2, 2, 3, 1, 2, 4, 84, 1, 1, 1, 4, 1, 1, 15, 2, 1, 1, 17, 1, 1, 8, 1, 1, 10, 1, 3, 1, 2, 2, 1, 2, 1, 2, 4, 22, 4, 1, 2, 1, 2, 1, 2, 1, 3, 1, 2, 2, 9

Offset: 0

Author

Robert G. Wilson v, Jul 30 2001

Keywords

• cofr
• easy
• nonn

Examples

			0.6815349144182235323019341634048123526710...
		

Links

• Harry J. Smith, Table of n, a(n) for n = 0..19999

Crossrefs

Cf. A063504 (decimal expansion).

Programs

Mathematica

ContinuedFraction[E^Pi - Pi^E, 100]

PARI

{ allocatemem(932245000); default(realprecision, 21000); e=exp(1); x=contfrac(e^Pi - Pi^e); for (n=1, 20000, write("b063503.txt", n-1, " ", x[n])) } \\ Harry J. Smith, Aug 24 2009

Extensions

Offset changed by Andrew Howroyd, Aug 04 2024