This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A049517 #4 Mar 31 2012 14:45:08 %S A049517 763,764,17535,19447,24467,28468,32789,39862,48440,56989,65261,89086, %T A049517 102388,120460,140745,141900,146044,161863,162249,193035,193036, %U A049517 205035,205194,211059,213246,215288,220569,222300,222301,244454,244455,250130 %N A049517 Starting index of a string of 5 or more consecutive equal digits in decimal expansion of Pi. %C A049517 Digits 3,1,4,... are indexed 1,2,3,... %t A049517 ConsecutiveOccurrences1[alist_, n_] := Flatten @ Position[ Apply[ SameQ, Partition[ alist, n, 1], {1}], True]; ConsecutiveOccurrences1[ First[ RealDigits[Pi, 10, 252499]], 5] %Y A049517 Cf. A049514, A049515, A049516, A049518, A049519, A049520, A049521, A049522, A049523. %K A049517 nonn,base %O A049517 1,1 %A A049517 _Harvey P. Dale_ %E A049517 Edited by _Robert G. Wilson v_, May 09 2003