login
Starting positions of strings of four 5's in the decimal expansion of Pi.
2

%I #15 Apr 15 2019 18:19:07

%S 24466,24467,33172,39861,39862,46512,52352,106626,129828,135904,

%T 147625,159619,162812,167310,205034,205035,205193,205194,219639,

%U 234924,244453,244454,244455,249745,253209,253210,253211,267581,288855,314518,319921

%N Starting positions of strings of four 5's in the decimal expansion of Pi.

%H <a href="/index/Ph#Pi314">Index entries for sequences related to the number Pi</a>

%H Dave Andersen, <a href="http://www.angio.net/pi/piquery">Pi-Search Page</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PiDigits.html">Pi Digits.</a>

%t Transpose[StringPosition[StringDrop[ToString[N[Pi,9! ]],2],"5555"]][[1]] (* _Vladimir Joseph Stephan Orlovsky_, Jun 19 2009 *)

%t 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 *)

%Y Cf. A083620 (three 5's), A083622 (five 5's).

%K base,nonn

%O 1,1

%A _Rick L. Shepherd_, May 02 2003