login
A039408
Numbers whose base-10 representation has the same nonzero number of 1's and 8's.
0
18, 81, 108, 128, 138, 148, 158, 168, 178, 180, 182, 183, 184, 185, 186, 187, 189, 198, 218, 281, 318, 381, 418, 481, 518, 581, 618, 681, 718, 781, 801, 810, 812, 813, 814, 815, 816, 817, 819, 821, 831, 841, 851, 861, 871, 891, 918, 981, 1008, 1028
OFFSET
1,1
MATHEMATICA
Select[Range[1200], DigitCount[#, 10, 1]==DigitCount[#, 10, 8]>0&] (* Harvey P. Dale, Feb 04 2015 *)
CROSSREFS
Sequence in context: A219144 A063495 A264850 * A043231 A044011 A338039
KEYWORD
nonn,base,easy
STATUS
approved