|
%I #3 Mar 30 2012 17:31:06
%S 2,8,116,1026,10137,99758,999333,10002475,99997334,1000037790,
%T 9999937631,99999945664
%N Number of times the digit 1 appears in the first 10^n digits of Pi.
%D Alfred S. Posamentier & Ingmar Lehmann, A Biography of the World's Most Mysterious Number, Prometheus Books, Amherst, NY 2004, page 129.
%H Kanada Laboratory, <a href="http://www.super-computing.org/pi-decimal_current.html">Statistical Distribution Information</a>.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PiDigits.html">Pi Digits</a>
%t $MaxPrecision = 1100000; dp = Drop[ RealDigits[Pi, 10, 1000010] [[1]], 1]; Table[ Count[ Take[dp, 10^n], 1], {n, 6}]
%Y Cf. A099291, A099293, A099294, A099295, A099296, A099297, A099298, A099299, A099300.
%K nonn,base
%O 1,1
%A _Robert G. Wilson v_, Oct 11 2004
|
