A033026 Numbers whose base-13 expansion has no run of digits with length < 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

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

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

Adjacent sequences: A033023 A033024 A033025 * A033027 A033028 A033029

Keyword

nonn,base

Author

Clark Kimberling

Status

approved