login
A050254
Starting positions of strings of 2 7's in the decimal expansion of Pi.
1
559, 621, 625, 633, 739, 742, 890, 948, 954, 1066, 1087, 1179, 1261, 1307, 1545, 1589, 1590, 1591, 1630, 1704, 1953, 2049, 2173, 2212, 2325, 2337, 2471, 2672, 3057, 3074, 3111, 3278, 3282, 3806, 3941, 4143, 4208, 4345, 4441, 4575, 4576
OFFSET
1,1
MATHEMATICA
q=8!; z=7; a=RealDigits[Pi, 10, q]; lst={}; Do[b=a[[1]][[n]]; c=a[[1]][[n+1]]; If[b==z&&c==z, AppendTo[lst, n-1]], {n, q-1}]; lst (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
CROSSREFS
Sequence in context: A185772 A186134 A350664 * A139197 A361030 A136346
KEYWORD
nonn,base
STATUS
approved