A127556 Decimal expansion of the number 4.1636635147332912770473687837946011358... having continued fraction expansion 4, 6, 9, 12, 15, 18, 21, 26, 30, 34, 39, ... (arithmetical average of two consecutive odd primes A024675).

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

Offset: 1

Author

Artur Jasinski, Jan 18 2007

Keywords

• cons
• nonn

Crossrefs

Cf. A064442, A127549, A127550, A127551, A127552, A127553, A127555, A127556, A127557, A127558, A127559, A024675.

Programs

Mathematica

a = {}; Do[AppendTo[a, (Prime[n] + Prime[n + 1])/2], {n, 2, 500}]; RealDigits[N[FromContinuedFraction[a], 100]][[1]]

Extensions

a(100) corrected by Sean A. Irvine, Jul 09 2023