[go: up one dir, main page]

login
A083637
Starting positions of strings of three 8's in the decimal expansion of Pi.
2
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,1
LINKS
Dave Andersen, Pi-Search Page
Eric Weisstein's World of Mathematics, Pi Digits.
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 *)
CROSSREFS
Cf. A050263 (two 8's), A083638 (four 8's).
Sequence in context: A252226 A252204 A374502 * A083638 A237553 A250467
KEYWORD
base,nonn
AUTHOR
Rick L. Shepherd, May 05 2003
STATUS
approved