OFFSET
1,1
COMMENTS
This value is very nearly 3 + (2^16 - 1)/2^22. Continued fraction expansion given by A119924.
LINKS
EXAMPLE
3.0156247615814208984374999999999999999999999999999999999999999999999999999999999999999999999999807758649950...
MATHEMATICA
RealDigits[(cf = ContinuedFraction[Pi, 80(*arbitrary precision*)]; IntegerPart[Pi] + Sum[(-1)^(k)/2^(Sum[cf[[i]], {i, 2, k}] - 1), {k, 2, Length[cf]}]), 10]
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Joseph Biberstine (jrbibers(AT)indiana.edu), May 29 2006
STATUS
approved