OFFSET
0,1
LINKS
Eric Weisstein's World of Mathematics, Plouffe's Constant
EXAMPLE
0.47562607673598855480497725290495471428196...
MATHEMATICA
digits = 102; bits = RealDigits[1/Pi, 2, 4*digits] // First; xor = BitXor[bits, Join[{0}, Most[bits]]]; B = FromDigits[{xor, -1}, 2]; RealDigits[B, 10, digits] // First (* Jean-François Alcover, Oct 01 2014 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Eric W. Weisstein, Jul 12 2003
STATUS
approved