|
%I #7 Apr 06 2016 17:42:44
%S 1,1,1,2,2,2,2,2,2,2,3,3,3,3,3,3,3,4,4,4,4,4,4,4,5,6,6,7,7,7,7,7,7,7,
%T 7,7,7,7,7,7,7,7,7,8,8,8,9,9,9,9,9,9,9,9,9,9,9,9,10,10,10,10,11,11,11,
%U 11,11,11,11,11,11,11,11,11,11,11,11,11,11,12,13,13,13,13,13,13,13,13,13
%N Number of occurrences of most frequent digit in decimal expansion of Pi.
%H Harvey P. Dale, <a href="/A052374/b052374.txt">Table of n, a(n) for n = 0..1000</a>
%e a(50)=9 because 3 appears 9 times in the first 50 digits of pi and other digits appear less frequently
%t Module[{nn=90,pidg},pidg=RealDigits[Pi,10,nn][[1]];Table[Max[ Transpose[ Tally[ Take[pidg,n]]][[2]]],{n,nn}]] (* _Harvey P. Dale_, Apr 06 2016 *)
%Y Cf. A000796.
%K nonn,base
%O 0,4
%A _Henry Bottomley_, Mar 08 2000
|
