Self Numbers by leonid

a=range(3025)
for x in a*1:
 a[x+sum(map(int,`x`))]=0
 if a[x]:print x

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top