%I #6 Aug 20 2012 03:45:44
%S 9,1,5,2,9,4,7,9,7,5,1,3,5,6,0,5,7,9,7,3,3,6,1,5,3,9,7,2,8,5,6,2,0,8,
%T 1,1,1,2,5,1,0,2,0,4,5,3,6,9,5,7,7,7,5,0,8,3,0,0,7,9,4,6,7,9,1,5,2,1,
%U 6,7,3,1,9,1,5,1,7,4,5,3,3,4,3,9,6,7,0,9,8,0,1,6,8,5,7,3,4,0,2,9,4,4,4,5,1
%N Digits in the decimal expansion of A100923 interpreted as digits of a binary number 0.1110101001010...
%e 0.91529479751356057973361539728562081112510204536957775...
%t N[Sum[If[And[PrimeQ[6*k - 1], PrimeQ[6*k + 1]], 1, 0]*2^(-k), {k, 1, 500}], 110]
%Y Cf. A100923, A100925.
%K cons,nonn,base
%O 0,1
%A Joseph Biberstine (jrbibers(AT)indiana.edu), Nov 22 2004