OFFSET
0,2
COMMENTS
Partial sums of A010790. - Sean A. Irvine, Jan 02 2019
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..252
MATHEMATICA
Table[Sum[k! (k+1)!, {k, 0, n}], {n, 0, 20}] (* Vincenzo Librandi, Jan 02 2019 *)
PROG
(PARI) a(n) = sum(k=0, n, k!*(k+1)!); \\ Michel Marcus, Jan 02 2019
(Magma) [&+[ Factorial(k)*Factorial(k+1): k in [0..n]]: n in [0..18]]; // Vincenzo Librandi, Jan 02 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Vincenzo Librandi, Jan 02 2019
STATUS
approved