OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..37
Eric Weisstein's World of Mathematics, Hyperfactorial
Eric Weisstein's World of Mathematics, Barnes G-Function
FORMULA
a(n) = Sum_{k = 0..n} A002109(k).
a(n) = Sum_{k = 0..n} (k!)^k/Barnes G-Function(k + 1).
EXAMPLE
a(0) = 1;
a(1) = 1 + 1^1 = 2;
a(2) = 1 + 1^1 + 1^1*2^2 = 6;
a(3) = 1 + 1^1 + 1^1*2^2 + 1^1*2^2*3^3 = 114;
a(4) = 1 + 1^1 + 1^1*2^2 + 1^1*2^2*3^3 + 1^1*2^2*3^3*4^4 = 27762, etc.
MATHEMATICA
Table[Sum[Hyperfactorial[k], {k, 0, n}], {n, 0, 11}]
Accumulate[Hyperfactorial[Range[0, 15]]] (* Harvey P. Dale, Sep 22 2021 *)
PROG
(PARI) a(n) = sum(k=0, n, prod(j=2, k, j^j)); \\ Altug Alkan, Nov 27 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Nov 27 2015
STATUS
approved