A058382 Continued fraction for Pie (A001355: digits of Pi and e interlaced).

32, 5, 1, 2, 1, 8, 2, 5, 1, 3, 1, 28, 1, 15, 1, 1, 4, 1, 2, 1, 1, 1, 2, 2, 1, 17, 1, 1, 2, 33, 1, 3, 1, 24, 1, 23, 2, 16, 4, 1, 1, 2, 2, 7, 1, 7, 11, 2, 1, 3, 2, 1, 1, 2, 7, 2, 2, 15, 3, 2, 1, 12, 1, 7, 7, 1, 1, 1, 34, 1, 1, 17, 1, 107, 1, 2, 2, 4, 1, 1, 4, 1, 1, 1, 5, 8, 1, 9, 6, 2, 4, 1, 6, 2, 1, 61

Offset

1,1

Links

Table of n, a(n) for n=1..96.

Mathematica

a = RealDigits[ N[ Pi, 500] ][ [1] ]; b = RealDigits[ N[ E, 500] ][ [1] ]; c = Table[0, {1000} ]; Do[ c[ [2n - 1] ] = a[ [n] ]; c[ [2n] ] = b[ [n] ], {n, 500} ]; ContinuedFraction[ FromDigits[ {c, {2} } ], 100][ [1] ]

Crossrefs

Cf. A001355.

Sequence in context: A249597 A303322 A126654 * A070617 A298922 A198065

Adjacent sequences: A058379 A058380 A058381 * A058383 A058384 A058385

Keyword

cofr,nonn

Author

Robert G. Wilson v, Dec 19 2000

Status

approved