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,1

Links

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

Formula

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

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 *)

Crossrefs

Cf. A000142, A000312, A036679.

Sequence in context: A138983 A121774 A209238 * A174432 A012874 A005161

Adjacent sequences: A053039 A053040 A053041 * A053043 A053044 A053045

Keyword

nonn

Author

N. J. A. Sloane, Feb 24 2000

Status

approved