A292735 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A292735

Numbers in which 5 outnumbers all other digits together.

5, 55, 155, 255, 355, 455, 505, 515, 525, 535, 545, 550, 551, 552, 553, 554, 555, 556, 557, 558, 559, 565, 575, 585, 595, 655, 755, 855, 955, 1555, 2555, 3555, 4555, 5055, 5155, 5255, 5355, 5455, 5505, 5515, 5525, 5535, 5545, 5550, 5551, 5552, 5553, 5554, 5555, 5556, 5557, 5558, 5559, 5565, 5575, 5585, 5595, 5655

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Subset of A292455.

LINKS

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

EXAMPLE

505 has more 5's than any other digit, whereas both 5005 and 5015 have as many other digits as 5's.

MATHEMATICA

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

Select[Range[6000], DigitCount[#, 10, 5]>(IntegerLength[#]-DigitCount[#, 10, 5])&] (* Harvey P. Dale, May 08 2022 *)