|
| |
|
|
A108862
|
|
Numbers n such that n divides the sum of the digits of (n!)^2.
|
|
0
|
|
|
|
1, 2, 3, 6, 9, 18, 34, 36, 54, 99, 111, 261, 648, 1161, 1296, 2763, 4735, 4784, 4911, 6327, 7929, 10599, 17352, 17541, 48372, 223956, 226185, 290502, 375480, 481207, 481620, 482567, 482801, 484412
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..34.
|
|
|
EXAMPLE
|
648 is a term because the sum of the digits in (648!)^2, 12312, is divisible by 648.
|
|
|
MATHEMATICA
|
Do[If[Mod[Plus @@ IntegerDigits[(n!)^2], n] == 0, Print[n]], {n, 1, 10000}]
|
|
|
CROSSREFS
|
Sequence in context: A091326 A113863 A085431 * A018582 A018619 A018638
Adjacent sequences: A108859 A108860 A108861 * A108863 A108864 A108865
|
|
|
KEYWORD
|
base,hard,more,nonn
|
|
|
AUTHOR
|
Ryan Propper (rpropper(AT)stanford.edu), Jul 11 2005
|
|
|
EXTENSIONS
|
More terms from Robert Gerbicz, Aug 24 2006
a(26)-a(34) from Donovan Johnson, Dec 13 2010
|
|
|
STATUS
|
approved
|
| |
|
|