[go: up one dir, main page]

login
A050263
Starting positions of strings of 2 8's in the decimal expansion of Pi.
1
34, 204, 317, 322, 372, 472, 848, 868, 931, 1023, 1141, 1194, 1469, 1537, 1753, 1778, 1822, 1868, 2167, 2299, 2384, 2421, 2464, 2529, 2655, 3028, 3164, 3366, 3470, 3559, 3683, 3763, 4104, 4285, 4610, 4751, 4752, 4753, 4985, 4986, 5154
OFFSET
1,1
MATHEMATICA
q=8!; z=8; 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: A074900 A302227 A058581 * A020869 A355884 A055716
KEYWORD
nonn,base
STATUS
approved