|
| |
|
|
A117562
|
|
Numbers n such that n is multiplier of the sum of decimal digits squared of n.
|
|
5
| |
|
|
0, 1, 10, 20, 50, 100, 110, 111, 120, 130, 133, 200, 210, 240, 267, 298, 310, 315, 360, 372, 376, 400, 420, 480, 500, 532, 550, 630, 803, 917, 973, 1000, 1010, 1011, 1020, 1030, 1071, 1100, 1101, 1110, 1134, 1148, 1200, 1211, 1222, 1290, 1300, 1302, 1316
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| Except for the first term, 0, all terms are in A034087.
|
|
|
MATHEMATICA
| Reap[Do[If[IntegerQ[n/Total[IntegerDigits[n]^2]], Sow[n]], {n, 1, 2000}]][[2, 1]]
|
|
|
CROSSREFS
| Cf. A034087.
Sequence in context: A160517 A072081 A034087 * A169663 A115045 A205879
Adjacent sequences: A117559 A117560 A117561 * A117563 A117564 A117565
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Apr 27 2006
|
| |
|
|
