%I #4 Jul 10 2011 18:41:28

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

%T 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,

%U 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,8,0,7,7,5,8,6,4,9,9

%N Decimal expansion of the value of Minkowski's question mark function at Pi.

%C This value is very nearly 3 + (2^16 - 1)/2^22. Continued fraction expansion given by A119924.

%H <a href="/index/Me#MinkowskiQ">Index entries for sequences related to Minkowski's question mark function</a>

%e 3.0156247615814208984374999999999999999999999999999999999999999999999999999999999999999999999999807758649950...

%t 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]

%Y Cf. A119924.

%K cons,nonn

%O 1,1

%A Joseph Biberstine (jrbibers(AT)indiana.edu), May 29 2006