A033004 Every run of digits of n in base 6 has length 2.
7, 14, 21, 28, 35, 252, 266, 273, 280, 287, 504, 511, 525, 532, 539, 756, 763, 770, 784, 791, 1008, 1015, 1022, 1029, 1043, 1260, 1267, 1274, 1281, 1288, 9079, 9086, 9093, 9100, 9107, 9576, 9583, 9597, 9604, 9611, 9828, 9835
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..700
Programs
-
Mathematica
Select[Range[10000], Union[Length/@Split[IntegerDigits[#, 6]]]=={2}&] (* Vincenzo Librandi, Feb 05 2014 *)
Formula
a(n) = 7*A043310(n) (= 7*n for n<6). - M. F. Hasler, Feb 02 2014
Comments