A112999 Partial sums of A036740.

1, 5, 221, 331997, 24883531997, 139314094387531997, 82606411393217618227531997, 6984964247224120535022357995827531997, 109110688415578301444592123476429107940843827531997

Offset: 1

Author

Jonathan Vos Post, Jan 03 2006

Keywords

• easy
• nonn

Examples

			a(1) = (1!)^1 = 1^1 = 1.
a(2) = (1!)^1 + (2!)^2 = 1^1 + 2^2 = 1 + 4 = 5.
a(3) = (1!)^1 + (2!)^2 + (3!)^3 = 1^1 + 2^2 + 6^3 = 1 + 4 + 216 = 221.
		

Links

• Seiichi Manyama, Table of n, a(n) for n = 1..30
• G. L. Honaker, Jr. and Chris Caldwell, Prime Curios! 331997

Crossrefs

Cf. A000142, A000178, A002109, A036740, A339311.

Programs

Mathematica

Table[Sum[Product[m^k,{m,1,k}],{k,1,n}],{n,1,10}] (* Vaclav Kotesovec, Nov 01 2014 *)
Accumulate[Table[(n!)^n,{n,10}]] (* Harvey P. Dale, Dec 23 2019 *)

PARI

a(n) = sum(k=1, n, k!^k); \\ Michel Marcus, Nov 30 2020

Formula

a(n) = Sum_{k=1..n} (k!)^k.

a(n) = Sum_{k=1..n} (A000142(k))^k.

a(n) = Sum_{k=1..n} A036740(k).

a(n) = Sum_{k=1..n} A002109(k) * A000178(k-1).