A083611 Starting positions of strings of four 3's in the decimal expansion of Pi.

28467, 28468, 66846, 79979, 84542, 89085, 89086, 93498, 95730, 119658, 145459, 146043, 146044, 150803, 158335, 162369, 169124, 172951, 178501, 186291, 190241, 191664, 193042, 214252, 217711, 222180, 231023, 235521, 263318, 263955, 297544

Offset: 1

Author

Rick L. Shepherd, May 01 2003

Keywords

• base
• nonn

Links

• Dave Andersen, Pi-Search Page
• Eric Weisstein's World of Mathematics, Pi Digits.
• Index entries for sequences related to the number Pi

Crossrefs

Cf. A083610 (three 3's), A083612 (five 3's).

Programs

Mathematica

Transpose[StringPosition[StringDrop[ToString[N[Pi,9! ]],2],"3333"]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
Flatten[Position[Partition[RealDigits[Pi,10,300000][[1]],4,1],?(#== {3,3,3,3}&)]]-1 (* _Harvey P. Dale, Oct 25 2011 *)