A292737 Numbers in which 7 outnumbers all other digits together.
7, 77, 177, 277, 377, 477, 577, 677, 707, 717, 727, 737, 747, 757, 767, 770, 771, 772, 773, 774, 775, 776, 777, 778, 779, 787, 797, 877, 977, 1777, 2777, 3777, 4777, 5777, 6777, 7077, 7177, 7277, 7377, 7477, 7577, 7677, 7707, 7717, 7727, 7737, 7747, 7757, 7767, 7770, 7771, 7772, 7773, 7774, 7775, 7776, 7777, 7778
Offset: 1
Examples
707 has more 7's than any other digit, whereas both 7007 and 7017 have as many other digits as 7's.
Crossrefs
Programs
-
Mathematica
Select[Range[0, 8000], Total@ #1 < First@ #2 & @@ TakeDrop[RotateLeft[#, 7] &@ DigitCount@ #, 9] &] (* Michael De Vlieger, Sep 25 2017 *)