login
A127550
Decimal expansion of the number 3.19451324273619331289098105345... having continued fraction expansion 3, 5, 7, 11, 13, 17, 19, ... (successive odd primes).
7
3, 1, 9, 4, 5, 1, 3, 2, 4, 2, 7, 3, 6, 1, 9, 3, 3, 1, 2, 8, 9, 0, 9, 8, 1, 0, 5, 3, 4, 5, 0, 5, 5, 1, 7, 8, 4, 3, 8, 3, 9, 7, 4, 3, 9, 3, 1, 9, 7, 1, 1, 8, 1, 9, 3, 8, 2, 6, 7, 1, 9, 6, 9, 3, 3, 5, 4, 6, 9, 1, 2, 2, 5, 3, 6, 4, 2, 7, 6, 2, 6, 7, 5, 9, 5, 7, 8, 7, 6, 9, 8, 6, 5, 6, 1, 4, 7, 3, 3, 4
OFFSET
1,1
MATHEMATICA
a = {}; Do[AppendTo[a, Prime[n]], {n, 2, 100}]; RealDigits[N[FromContinuedFraction[a], 100]][[1]]
RealDigits[FromContinuedFraction[Prime[Range[2, 40]]], 10, 120][[1]] (* Harvey P. Dale, Mar 25 2012 *)
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Artur Jasinski, Jan 18 2007
STATUS
approved