OFFSET
1,2
REFERENCES
Alfred S. Posamentier and Ingmar Lehmann, A Biography of the World's Most Mysterious Number, Prometheus Books, Amherst, NY 2004, page 129.
LINKS
Kanada Laboratory, Statistical Distribution Information.
Eric Weisstein's World of Mathematics, Pi Digits.
MATHEMATICA
$MaxPrecision = 1100000; dp = Drop[ RealDigits[Pi, 10, 1000010] [[1]], 1]; Table[ Count[ Take[dp, 10^n], 9], {n, 6}]
PROG
from sympy import S
def a(n, d=9): return str(S.Pi.n(10**n + 2))[2:-1].count(str(d))
print([a(n) for n in range(1, 7)]) # Michael S. Branicky, Jan 14 2021
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Robert G. Wilson v, Oct 11 2004
EXTENSIONS
Name clarified by Michael S. Branicky, Jan 15 2021
STATUS
approved