A039155 Numbers whose base-10 representation has the same number of 8's and 9's.

0, 1, 2, 3, 4, 5, 6, 7, 10, 11, 12, 13, 14, 15, 16, 17, 20, 21, 22, 23, 24, 25, 26, 27, 30, 31, 32, 33, 34, 35, 36, 37, 40, 41, 42, 43, 44, 45, 46, 47, 50, 51, 52, 53, 54, 55, 56, 57, 60, 61, 62, 63, 64, 65, 66, 67, 70, 71, 72, 73, 74, 75, 76, 77, 89, 98, 100, 101, 102

Offset: 1

Author

Olivier Gérard

Keywords

• nonn
• base
• easy

Programs

Mathematica

Select[Range[0,110], DigitCount[#,10,8] == DigitCount[#,10,9]&] (* Harvey P. Dale, Jan 13 2013 *)