login
A033026
Numbers whose base-13 expansion has no run of digits with length < 2.
2
14, 28, 42, 56, 70, 84, 98, 112, 126, 140, 154, 168, 183, 366, 549, 732, 915, 1098, 1281, 1464, 1647, 1830, 2013, 2196, 2366, 2380, 2394, 2408, 2422, 2436, 2450, 2464, 2478, 2492, 2506, 2520, 2534, 4732, 4746, 4760, 4774
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[10000], Min[Length/@Split[IntegerDigits[#, 13]]]>1&] (* Vincenzo Librandi, Feb 05 2014 *)
CROSSREFS
Sequence in context: A044854 A044899 A008596 * A044839 A033011 A321371
KEYWORD
nonn,base
STATUS
approved