A292738 Numbers in which 8 outnumbers all other digits together.
8, 88, 188, 288, 388, 488, 588, 688, 788, 808, 818, 828, 838, 848, 858, 868, 878, 880, 881, 882, 883, 884, 885, 886, 887, 888, 889, 898, 988, 1888, 2888, 3888, 4888, 5888, 6888, 7888, 8088, 8188, 8288, 8388, 8488, 8588, 8688, 8788, 8808, 8818, 8828, 8838, 8848, 8858, 8868, 8878, 8880, 8881, 8882, 8883, 8884, 8885, 8886, 8887, 8888
Offset: 1
Examples
808 has more 8's than any other digit, whereas both 8008 and 8018 have as many other digits as 8's.
Crossrefs
Programs
-
Mathematica
Select[Range[0, 9000], Total@ #1 < First@ #2 & @@ TakeDrop[RotateLeft[#, 8] &@ DigitCount@ #, 9] &] (* Michael De Vlieger, Sep 25 2017 *)