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,1

Links

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

Example

707 has more 7's than any other digit, whereas both 7007 and 7017 have as many other digits as 7's.

Mathematica

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

Crossrefs

Subset of A292457.

Numbers where n outnumbers any other digit: A292449, A292450, A292451, A292452, A292453, A292454, A292455, A292456, A292457, A292458.

Numbers in which n outnumbers all other digits together: A292730, A292731, A292732, A292733, A292734, A292735, A292736, A292738, A292739.

Sequence in context: A139264 A045642 A292457 * A352995 A213261 A268958

Adjacent sequences: A292734 A292735 A292736 * A292738 A292739 A292740

Keyword

nonn,base,easy

Author

Halfdan Skjerning, Sep 25 2017

Status

approved