A033016 Numbers whose base-3 expansion has no run of digits with length < 2.

4, 8, 13, 26, 36, 40, 44, 72, 76, 80, 108, 117, 121, 125, 134, 216, 229, 234, 238, 242, 324, 328, 332, 351, 360, 364, 368, 377, 396, 400, 404, 648, 652, 656, 684, 688, 692, 702, 715, 720, 724, 728, 972, 976, 980, 985, 998, 1053

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A007089. Supersequence of A033001.

Sequence in context: A009852 A323951 A080003 * A027008 A114997 A146919

Adjacent sequences: A033013 A033014 A033015 * A033017 A033018 A033019

Keyword

nonn,base

Author

Clark Kimberling

Status

approved