[go: up one dir, main page]

login
A083621
Starting positions of strings of four 5's in the decimal expansion of Pi.
2
24466, 24467, 33172, 39861, 39862, 46512, 52352, 106626, 129828, 135904, 147625, 159619, 162812, 167310, 205034, 205035, 205193, 205194, 219639, 234924, 244453, 244454, 244455, 249745, 253209, 253210, 253211, 267581, 288855, 314518, 319921
OFFSET
1,1
MATHEMATICA
Transpose[StringPosition[StringDrop[ToString[N[Pi, 9! ]], 2], "5555"]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
SequencePosition[RealDigits[Pi, 10, 320000][[1]], {5, 5, 5, 5}][[All, 1]]-1 (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 15 2019 *)
CROSSREFS
Cf. A083620 (three 5's), A083622 (five 5's).
Sequence in context: A156844 A174754 A206682 * A083622 A237207 A224423
KEYWORD
base,nonn
AUTHOR
Rick L. Shepherd, May 02 2003
STATUS
approved