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 A178709 #9 Aug 02 2015 17:07:18 %S A178709 3,11,11,11,11,11,451,645,645,645,5212,18123,18123,58276,58276,80697, %T A178709 80697,80697,1146746,1962901,3296306,9772065,9772065,9772065,47536571, %U A178709 169338693,169338693,207861698,207861698,207861698 %N A178709 Position of start of first appearance of n consecutive 1's in the binary expansion of Pi. %C A178709 Out of the first 2^28 binary digits, 134220460 are "0" and 134214996 are "1". - _Robert G. Wilson v_, Jun 09 2010 %C A178709 This sequence ignores bits in the integer part of the binary expansion of Pi. %e A178709 6 consecutive 1's are first found beginning at the 11th position in Pi's binary expansion, so the sixth term in this sequence is 11. %t A178709 pib = ToString@ FromDigits[ RealDigits[Pi - 3, 2, 2^28][[1]]]; f[n_] := 2 + StringPosition[ pib, ToString[(10^n - 1)/9], 1][[1, 1]]; Array[f, 30] (* _Robert G. Wilson v_, Jun 09 2010 *) %Y A178709 Cf. A004601, A035117, A178708. %K A178709 base,nonn %O A178709 1,1 %A A178709 _Will Nicholes_, Jun 06 2010 %E A178709 a(14)-a(30) from _Robert G. Wilson v_, Jun 09 2010