login
A083598
Starting positions of strings of four 0's in the decimal expansion of Pi.
1
13390, 17534, 17535, 37322, 49055, 51217, 54936, 63456, 93041, 102313, 119629, 129328, 130642, 145266, 154373, 168318, 171928, 196073, 202377, 204243, 211058, 211059, 213051, 215287, 215288, 235900, 237791, 254228, 254524, 275491, 293800
OFFSET
1,1
MATHEMATICA
Transpose[StringPosition[StringDrop[ToString[N[Pi, 9! ]], 2], "0000"]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
Flatten[Position[Partition[RealDigits[Pi, 10, 300000][[1]], 4, 1], {0, 0, 0, 0}]]-1 (* Harvey P. Dale, Feb 27 2013 *)
SequencePosition[RealDigits[Pi, 10, 300000][[1]], {0, 0, 0, 0}][[;; , 1]]-1 (* Harvey P. Dale, Jun 05 2023 *)
CROSSREFS
Cf. A050202 (three 0's), A083599 (five 0's).
Sequence in context: A252240 A220060 A207048 * A238295 A291913 A015300
KEYWORD
nonn,base
AUTHOR
Rick L. Shepherd, Apr 30 2003
STATUS
approved