A292732 Numbers in which 2 outnumbers all other digits together.

2, 22, 122, 202, 212, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 232, 242, 252, 262, 272, 282, 292, 322, 422, 522, 622, 722, 822, 922, 1222, 2022, 2122, 2202, 2212, 2220, 2221, 2222, 2223, 2224, 2225, 2226, 2227, 2228, 2229, 2232, 2242, 2252, 2262, 2272, 2282, 2292, 2322, 2422, 2522, 2622, 2722, 2822, 2922

Offset

1,1

Comments

Subset of A292452.

Links

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

Example

202 has more 2's than any other digit, whereas both 2002 and 2012 have as many other digits as 2's.

Mathematica

Select[Range[0, 3000], Total@ #1 < First@ #2 & @@ TakeDrop[RotateLeft[#, 2] &@ DigitCount@ #, 9] &] (* Michael De Vlieger, Sep 22 2017 *)

Prog

(Python)
def ok(n):
  s=str(n); return s.count('2') > sum([0]+[s.count(d) for d in s if d!='2'])
print([m for m in range(2923) if ok(m)]) # Michael S. Branicky, Feb 22 2021

Crossrefs

Cf. A292449, A292450, A292451, A292452, A292453, A292454, A292455, A292456, A292457, A292458, A292730, A292731, A292733, A292734, A292735, A292736, A292737, A292738, A292739.

Sequence in context: A083833 A221697 A292452 * A206418 A255866 A330900

Adjacent sequences: A292729 A292730 A292731 * A292733 A292734 A292735

Keyword

nonn,base,easy

Author

Halfdan Skjerning, Sep 22 2017

Status

approved