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

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 16, 32, 48, 64, 80, 96, 112, 128, 144, 160, 176, 192, 208, 224, 225, 241, 257, 273, 289, 305, 321, 337, 353, 369, 385, 401, 417, 433, 449, 450, 466, 482, 498, 514, 530, 546, 562, 578, 594, 610, 626, 642, 658, 674

Offset

0,3

Links

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

Mathematica

Select[Range[0, 700], Min[Differences[Length/@Split[IntegerDigits[ #, 15]]]]>0&] (* Harvey P. Dale, Nov 08 2017 *)

Crossrefs

Cf. A037015, A043704, A043718, A044826, A044964.

Sequence in context: A017907 A044964 A044826 * A043718 A296756 A029960

Adjacent sequences: A048309 A048310 A048311 * A048313 A048314 A048315

Keyword

nonn,base

Author

Patrick De Geest, Feb 15 1999

Status

approved