A053042 a(n) = n^n + n!.

2, 6, 33, 280, 3245, 47376, 828583, 16817536, 387783369, 10003628800, 285351587411, 8916579449856, 302881333613053, 11112094003849216, 437895198055227375, 18446764996499439616, 827240617573764860177, 39346414477670243303424

Offset: 1

Author

N. J. A. Sloane, Feb 24 2000

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A000142, A000312, A036679.

Programs

Mathematica

lst={};Do[AppendTo[lst, n^n+n! ], {n, 3*4!}];lst (* Vladimir Joseph Stephan Orlovsky, Nov 20 2008 *)
Table[n^n+n!,{n,20}] (* Harvey P. Dale, Dec 31 2016 *)

Formula

E.g.f.: 1/(1 + LambertW(-x)) + 1/(1 - x), where LambertW() is the Lambert W-function. - Ilya Gutkovskiy, Jan 08 2017