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

0, 1, 2, 3, 4, 5, 6, 7, 9, 18, 27, 36, 45, 54, 63, 64, 73, 82, 91, 100, 109, 118, 127, 128, 137, 146, 155, 164, 173, 182, 191, 192, 201, 210, 219, 228, 237, 246, 255, 256, 265, 274, 283, 292, 301, 310, 319, 320, 329, 338, 347, 356, 365, 374, 383, 384, 393, 402

Offset

0,3

Links

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

Mathematica

Select[Range[0, 500], Min[Differences[Length/@Split[IntegerDigits[ #, 8]]]]>0&] (* Harvey P. Dale, Dec 06 2018 *)

Crossrefs

Cf. A037015, A043697, A043711, A044819, A044957.

Sequence in context: A044957 A297142 A044819 * A043711 A296706 A029803

Adjacent sequences: A048302 A048303 A048304 * A048306 A048307 A048308

Keyword

nonn,base

Author

Patrick De Geest, Feb 15 1999

Status

approved