OFFSET
1,1
EXAMPLE
5.1410381418412742236797378119983174092833067391135342072110210562...
MATHEMATICA
a = {}; Do[AppendTo[a, Prime[n]], {n, 3, 100}]; RealDigits[N[FromContinuedFraction[a], 100]][[1]]
RealDigits[ FromContinuedFraction[Prime /@ Range[3, 50]], 10, 111][[1]]
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Artur Jasinski, Jan 18 2007
EXTENSIONS
More terms from Robert G. Wilson v, Dec 30 2007
STATUS
approved