OFFSET
0,1
COMMENTS
This value is very nearly (127*2^16 + 1)/2^25 = 8323073/33554432. Continued fraction expansion given by A119926.
LINKS
EXAMPLE
0.248046904802322387695312500000000000000000000000000000000000000000000000000000000000000000000002403...
MATHEMATICA
RealDigits[(cf = ContinuedFraction[1/Pi, 80(*arbitrary precision*)]; IntegerPart[1/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