OFFSET
1,2
MATHEMATICA
Select[Range[660], Total[IntegerDigits[#]]==Total[IntegerDigits[#, 9]]&] (* Harvey P. Dale, Feb 07 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved