This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A292737 #14 Sep 25 2017 11:25:55 %S A292737 7,77,177,277,377,477,577,677,707,717,727,737,747,757,767,770,771,772, %T A292737 773,774,775,776,777,778,779,787,797,877,977,1777,2777,3777,4777,5777, %U A292737 6777,7077,7177,7277,7377,7477,7577,7677,7707,7717,7727,7737,7747,7757,7767,7770,7771,7772,7773,7774,7775,7776,7777,7778 %N A292737 Numbers in which 7 outnumbers all other digits together. %e A292737 707 has more 7's than any other digit, whereas both 7007 and 7017 have as many other digits as 7's. %t A292737 Select[Range[0, 8000], Total@ #1 < First@ #2 & @@ TakeDrop[RotateLeft[#, 7] &@ DigitCount@ #, 9] &] (* _Michael De Vlieger_, Sep 25 2017 *) %Y A292737 Subset of A292457. %Y A292737 Numbers where n outnumbers any other digit: A292449, A292450, A292451, A292452, A292453, A292454, A292455, A292456, A292457, A292458. %Y A292737 Numbers in which n outnumbers all other digits together: A292730, A292731, A292732, A292733, A292734, A292735, A292736, A292738, A292739. %K A292737 nonn,base,easy %O A292737 1,1 %A A292737 _Halfdan Skjerning_, Sep 25 2017