|
|
A099295
|
|
Number of times the digit 4 appears in the first 10^n digits of Pi.
|
|
11
|
|
|
1, 10, 93, 1012, 9971, 100230, 1001093, 10003863, 100011958, 999937688, 10000032702, 100000357857
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
REFERENCES
|
Alfred S. Posamentier & Ingmar Lehmann, A Biography of the World's Most Mysterious Number, Prometheus Books, Amherst, NY 2004, page 129.
|
|
LINKS
|
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], 4], {n, 6}]
Module[{pid=RealDigits[Pi, 10, 10^7][[1]], ac}, ac=Accumulate[If[#==4, 1, 0]&/@pid]; Table[ac[[10^n]], {n, 7}]] (* Generates the first 7 terms of the sequence. *) (* Harvey P. Dale, Jan 07 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|