|
| |
|
|
A104344
|
|
Sum[k!^2,{k,n}].
|
|
2
| |
|
|
1, 5, 41, 617, 15017, 533417, 25935017, 1651637417, 133333531817, 13301522971817, 1606652445211817, 231049185247771817, 39006837228880411817, 7639061293780877851817, 1717651314017980301851817
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Factorial Sums
|
|
|
MATHEMATICA
| s=0; lst={}; Do[AppendTo[lst, s+=n!^2], {n, 4!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 24 2009]
Table[Sum[(k!)^2, {k, n}], {n, 15}] (* From Harvey P. Dale, Jul 21 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A144286 A139034 A073854 * A100288 A076094 A076131
Adjacent sequences: A104341 A104342 A104343 * A104345 A104346 A104347
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com), Mar 02, 2005
|
|
|
EXTENSIONS
| More terms and Mathematica program Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 24 2009
|
| |
|
|
