|
%I #15 Apr 19 2019 09:29:37
%S 1,1,1,1,1,1,3,10,32,5,5,5,19,16,13,19,7,25,25,15,9,17,29,23,60,35,3,
%T 6,4,91,20,30,51,85,70,103,33,44,28,3,52,17,60,62,9,187,4,39,39,10,13,
%U 8,37,14,56,18,20,142,4,38,57,131,17,14,33,101,40,6,42,15,68,191,149,24
%N Position of the first zero in the fractional part of the base n expansion of Pi.
%C The first digit after the decimal point is indexed 1.
%C Given that in a normal number there is a 1/n possibility that each basimal place is a zero and that Pi is held to be normal in all integer bases, the statistically expected value of a(n) is n.
%D Steven R. Finch, Mathematical Constants, Cambridge, 2003, pp. 17-28.
%H Steven R. Finch, <a href="http://www.people.fas.harvard.edu/~sfinch/constant/plouffe/plouffe.html">The Miraculous Bailey-Borwein-Plouffe Pi Algorithm</a> [Broken link]
%H Steven R. Finch, <a href="http://web.archive.org/web/20010603082348/http://www.mathsoft.com/asolve/plouffe/plouffe.html">The Miraculous Bailey-Borwein-Plouffe Pi Algorithm</a> [From the Wayback machine]
%H Stan Wagon, <a href="http://www.astro.univie.ac.at/~wasi/PI/pi_normal.html">Is Pi Normal?</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/NormalNumber.html">Normal Number</a>
%e Pi in base 9 is 3.12418812407442... Since the first zero is in the tenth nonary place, a(9)=10.
%t f[n_] := (rd = RealDigits[Pi, n, 500]; Flatten[ Position[ rd[[1]], 0, 1, 1] - rd[[2]]] [[1]]); Table[ f[n], {n, 2, 75}]
%Y Cf. A000796, A004601, A062964.
%K nonn
%O 2,7
%A _Carl R. White_, Jun 26 2002
%E Edited by _Robert G. Wilson v_, Jun 27 2002
|
