login
Numbers where 5 outnumbers any other digit.
19

%I #20 Dec 09 2020 21:09:18

%S 5,55,155,255,355,455,505,515,525,535,545,550,551,552,553,554,555,556,

%T 557,558,559,565,575,585,595,655,755,855,955,1055,1255,1355,1455,1505,

%U 1525,1535,1545,1550,1552,1553,1554,1555,1556,1557,1558,1559,1565,1575,1585

%N Numbers where 5 outnumbers any other digit.

%e 505 has more 5's than any other digit, whereas 5005 has as many 0's as 5's.

%t Select[Range[0, 2000], Max@ #1 < First@ #2 & @@ TakeDrop[RotateLeft[#, 5] &@ DigitCount@ #, 9] &] (* _Michael De Vlieger_, Sep 16 2017 *)

%Y Cf. A292449, A292450, A292451, A292452, A292453, A292454, A292456, A292457, A292458.

%K nonn,base,easy

%O 1,1

%A _Halfdan Skjerning_, Sep 16 2017

%E More terms from _Michael De Vlieger_, Sep 16 2017