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