A033019 Numbers whose base-6 expansion has no run of digits with length < 2.

7, 14, 21, 28, 35, 43, 86, 129, 172, 215, 252, 259, 266, 273, 280, 287, 504, 511, 518, 525, 532, 539, 756, 763, 770, 777, 784, 791, 1008, 1015, 1022, 1029, 1036, 1043, 1260, 1267, 1274, 1281, 1288, 1295, 1512, 1548, 1555, 1562

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A007092.

Programs

Mathematica

Select[Range[10000], Min[Length/@Split[IntegerDigits[#, 6]]]>1&] (* Vincenzo Librandi, Feb 05 2014 *)