A353181 Numbers in which more than half of the digits are the same.

1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 22, 33, 44, 55, 66, 77, 88, 99, 100, 101, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 121, 122, 131, 133, 141, 144, 151, 155, 161, 166, 171, 177, 181, 188, 191, 199, 200, 202, 211, 212, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 232

Offset

1,2

Comments

Same as A044959 for terms <= 1000, and then differing at A044959(272) = 1001 which is not a term here (the next instead a(272) = 1011).

Links

Zhining Yang, Table of n, a(n) for n = 1..30000

Example

1211 is a term: it has 4 digits, 3 of which are 1's, and 3/4 > 1/2.
1212 is not a term: it has 4 digits, no one of which appears more than twice.

Mathematica

Select[Range[300], Max[DigitCount[#]] > IntegerLength[#]/2 &]

Prog

(Python)
def ok(k):
    t=str(k)
    return(max(t.count(str(i)) for i in range(10))>(len(t)//2))
print([n for n in range(1, 201) if ok(n)])

Crossrefs

Cf. A109303, A044959.

Sequence in context: A071242 A378560 A044959 * A306273 A141033 A044821

Adjacent sequences: A353178 A353179 A353180 * A353182 A353183 A353184

Keyword

nonn,base,easy

Author

Zhining Yang, Apr 29 2022

Status

approved