Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Feb 05 2014 03:14:28
%S 16,32,48,64,80,96,112,128,144,160,176,192,208,224,3600,3632,3648,
%T 3664,3680,3696,3712,3728,3744,3760,3776,3792,3808,3824,7200,7216,
%U 7248,7264,7280,7296,7312,7328,7344,7360,7376,7392
%N Every run of digits of n in base 15 has length 2.
%C 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 04 2014
%H Vincenzo Librandi, <a href="/A033013/b033013.txt">Table of n, a(n) for n = 1..2000</a>
%F a(n) = 16*A043319(n) (= 16n for n<15). - _M. F. Hasler_, Feb 02 2014
%t Select[Range[10000], Union[Length/@Split[IntegerDigits[#, 15]]]=={2}&] (* _Vincenzo Librandi_, Feb 05 2014 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_