login
A050215
Starting positions of strings of 2 2's in the decimal expansion of Pi.
1
135, 185, 484, 535, 661, 687, 824, 964, 1070, 1397, 1735, 1736, 1840, 1889, 1890, 1910, 2036, 2042, 2140, 2278, 2279, 2372, 2376, 2377, 2412, 2432, 2527, 2551, 2651, 3019, 3080, 3389, 3402, 3434, 3435, 3604, 3883, 3944, 3988, 4233, 4375
OFFSET
1,1
MATHEMATICA
a=RealDigits[Pi, 10, 7! ]; lst={}; Do[b=a[[1]][[n]]; c=a[[1]][[n+1]]; If[b==2&&c==2, AppendTo[lst, n-1]], {n, 7!-1}]; lst (* Vladimir Joseph Stephan Orlovsky, Jun 07 2009 *)
CROSSREFS
Cf. A000796.
Sequence in context: A025363 A296451 A096593 * A358778 A359597 A218417
KEYWORD
nonn,base
STATUS
approved