A117570 Numbers of the form k * (sum of digits of k) listed sorted with multiplicity.

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

Offset

1,3

Links

David A. Corneth, Table of n, a(n) for n = 1..10000

Ernesto Estrada, Puri Pereira-Ramos, Spatial 'Artistic' Networks: From Deconstructing Integer-Functions to Visual Arts, Complexity, Vol. 2018 (2018), Article ID 9893867.

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

Sorted terms of A057147.

Terms without duplicates are given by A337816.

Sequence in context: A340784 A260963 A243188 * A337816 A272266 A155566

Adjacent sequences: A117567 A117568 A117569 * A117571 A117572 A117573

Keyword

nonn,base

Author

Ernesto Estrada (estrada66(AT)yahoo.com), Jan 02 2008

Status

approved