A083637 Starting positions of strings of three 8's in the decimal expansion of Pi.
4751, 4752, 4985, 5871, 6070, 6850, 9338, 10229, 10527, 14298, 16763, 16910, 17164, 18483, 19469, 19752, 20337, 20807, 21225, 22192, 22216, 22770, 23079, 25062, 25196, 26886, 27750, 30086, 30633, 30687, 30796, 30797, 32251, 33850, 35639
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
- Index entries for sequences related to the number Pi
- Dave Andersen, Pi-Search Page
- Eric Weisstein's World of Mathematics, Pi Digits.
Programs
-
Mathematica
q=9!;z=8;a=RealDigits[Pi,10,q];lst={};Do[b=a[[1]][[n]];c=a[[1]][[n+1]];d=a[[1]][[n+2]];If[b==z&&c==z&&d==z,AppendTo[lst,n-1]],{n,q-2}];lst (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *) SequencePosition[RealDigits[Pi,10,36000][[1]],{8,8,8}][[All,1]]-1 (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 02 2018 *)
Comments