login
A037997
Numbers whose maximal base-9 run length is 2.
1
10, 20, 30, 40, 50, 60, 70, 80, 81, 90, 92, 93, 94, 95, 96, 97, 98, 101, 111, 121, 131, 141, 151, 161, 162, 172, 180, 181, 183, 184, 185, 186, 187, 188, 192, 202, 212, 222, 232, 242, 243, 253, 263, 270, 271, 272, 274, 275, 276, 277
OFFSET
1,1
MATHEMATICA
Select[Range[300], Max[Length/@Split[IntegerDigits[#, 9]]]==2&] (* Harvey P. Dale, Sep 01 2014 *)
CROSSREFS
Sequence in context: A342143 A344331 A358048 * A044850 A282150 A338641
KEYWORD
nonn,base
STATUS
approved