[go: up one dir, main page]

login
A083625
Starting positions of strings of three 6's in the decimal expansion of Pi.
1
2440, 3151, 4000, 4435, 5403, 6840, 10163, 10335, 10591, 13594, 15888, 16109, 18504, 20231, 21880, 21881, 23057, 23511, 24566, 25948, 26212, 27703, 27841, 29666, 29868, 29869, 32427, 32428, 33363, 36353, 38132, 40370, 40650, 43523
OFFSET
1,1
MATHEMATICA
q=9!; z=6; 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 *)
CROSSREFS
Cf. A050245 (two 6's), A083626 (four 6's).
Sequence in context: A345518 A345771 A252047 * A253842 A253835 A253929
KEYWORD
base,nonn
AUTHOR
Rick L. Shepherd, May 03 2003
STATUS
approved