%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