

A117810


Numbers n such that n is k*(the sum of decimal digits squared of n), k=153 case.


0




OFFSET

1,2


COMMENTS

k=153 case has the longest sequence for k <= 1000.


LINKS

Table of n, a(n) for n=1..7.


MATHEMATICA

k=153; Do[If[n==k*Total[IntegerDigits[n]^2], Print[n]], {n, 0, 200000, k}]


CROSSREFS

Cf. A117565 k=7 case.
Sequence in context: A210312 A125502 A168631 * A236871 A300194 A188254
Adjacent sequences: A117807 A117808 A117809 * A117811 A117812 A117813


KEYWORD

base,fini,full,nonn


AUTHOR

Zak Seidov, Apr 30 2006


STATUS

approved



