|
|
A117570
|
|
Numbers of the form k * (sum of digits of k) listed sorted with multiplicity.
|
|
2
|
|
|
0, 1, 4, 9, 10, 16, 22, 25, 36, 36, 40, 49, 52, 63, 64, 70, 81, 88, 90, 90, 100, 112, 115, 124, 136, 144, 160, 160, 162, 175, 190, 198, 202, 205, 208, 220, 238, 243, 250, 252, 280, 280, 301, 306, 306, 319, 324, 333, 352, 360, 360, 364, 370, 400, 405, 412, 418, 424
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
EXAMPLE
|
2008 is a term since 2008 = 251*(2+5+1).
|
|
MATHEMATICA
|
With[{nn = 400}, TakeWhile[#, # <= nn &] &@ Union@ Array[# Total@ IntegerDigits[#] &, nn + 1, 0]] (* Michael De Vlieger, Apr 19 2018 *)
|
|
CROSSREFS
|
Terms without duplicates are given by A337816.
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Ernesto Estrada (estrada66(AT)yahoo.com), Jan 02 2008
|
|
STATUS
|
approved
|
|
|
|