|
| |
|
|
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.
|
|
|
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: A196896 A125502 A168631 * A188254 A162003 A107541
Adjacent sequences: A117807 A117808 A117809 * A117811 A117812 A117813
|
|
|
KEYWORD
| base,fini,full,nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Apr 30 2006
|
| |
|
|
