login
A033284
Numbers whose maximal base-10 run length is 3.
1
111, 222, 333, 444, 555, 666, 777, 888, 999, 1000, 1110, 1112, 1113, 1114, 1115, 1116, 1117, 1118, 1119, 1222, 1333, 1444, 1555, 1666, 1777, 1888, 1999, 2000, 2111, 2220, 2221, 2223, 2224, 2225, 2226, 2227, 2228, 2229
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[3000], Max[Length/@Split[IntegerDigits[#]]]==3&] (* Harvey P. Dale, Mar 22 2022 *)
CROSSREFS
Sequence in context: A210711 A084043 A291266 * A333568 A123673 A177769
KEYWORD
nonn,base
STATUS
approved