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
KEYWORD
nonn,base
AUTHOR
Ernesto Estrada (estrada66(AT)yahoo.com), Jan 02 2008
STATUS
approved