OFFSET
1,2
MATHEMATICA
Select[Range[400], DigitCount[#, 6, 0]==DigitCount[#, 6, 2] == DigitCount[ #, 6, 4]&] (* Harvey P. Dale, Feb 29 2016 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved