A048303 Numbers whose base-6 expansions, read from left to right, have run lengths that strictly increase.

0, 1, 2, 3, 4, 5, 7, 14, 21, 28, 35, 36, 43, 50, 57, 64, 71, 72, 79, 86, 93, 100, 107, 108, 115, 122, 129, 136, 143, 144, 151, 158, 165, 172, 179, 180, 187, 194, 201, 208, 215, 216, 259, 302, 345, 388, 431, 432, 475, 518, 561, 604, 647, 648, 691, 734, 777, 820

Offset

0,3

Links

Table of n, a(n) for n=0..57.

Mathematica

Select[Range[0, 900], Min[Differences[Length/@Split[IntegerDigits[ #, 6]]]]> 0&] (* Harvey P. Dale, Jan 14 2014 *)

Crossrefs

Cf. A037015, A043695, A043709, A044817, A044955.

Sequence in context: A044955 A297136 A044817 * A043709 A296700 A297259

Adjacent sequences: A048300 A048301 A048302 * A048304 A048305 A048306

Keyword

nonn,base

Author

Patrick De Geest, Feb 15 1999

Status

approved