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 A033005 #13 Feb 05 2014 03:48:25 %S A033005 8,16,24,32,40,48,392,408,416,424,432,440,784,792,808,816,824,832, %T A033005 1176,1184,1192,1208,1216,1224,1568,1576,1584,1592,1608,1616,1960, %U A033005 1968,1976,1984,1992,2008,2352,2360,2368,2376,2384,2392 %N A033005 Every run of digits of n in base 7 has length 2. %C A033005 See A043291 and A033001 through A033014 for the analog in other bases, A033015 - A033029 for the variants with run lengths >= 2. - _M. F. Hasler_, Feb 02 2014 %H A033005 Vincenzo Librandi, <a href="/A033005/b033005.txt">Table of n, a(n) for n = 1..1500</a> %F A033005 a(n) = 8*A043311(n) (= 8*n for n<7). - _M. F. Hasler_, Feb 02 2014 %t A033005 Select[Range[2500],Union[Length/@Split[IntegerDigits[#,7]]]=={2}&] (* _Harvey P. Dale_, Oct 24 2011 *) %K A033005 nonn,base %O A033005 1,1 %A A033005 _Clark Kimberling_