A048312 - OEIS

%I #8 Oct 13 2019 16:39:06

%S 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,

%T 176,192,208,224,225,241,257,273,289,305,321,337,353,369,385,401,417,

%U 433,449,450,466,482,498,514,530,546,562,578,594,610,626,642,658,674

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

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

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

%K nonn,base

%O 0,3

%A _Patrick De Geest_, Feb 15 1999