A036782 a(n) = n - 1 + Sum_{j=0..n} j!.

0, 2, 5, 12, 37, 158, 879, 5920, 46241, 409122, 4037923, 43954724, 522956325, 6749977126, 93928268327, 1401602636328, 22324392524329, 378011820620330, 6780385526348331, 128425485935180332, 2561327494111820333

Offset

0,2

Links

Table of n, a(n) for n=0..20.

Formula

a(n) = A036781(n) - 1.

E.g.f.: exp(x-1)*(Ei(1)-Ei(1-x)) + exp(x)*(x-1) + 1/(1-x). - Robert Israel, Jan 05 2015

Maple

N:= 30: # to get a(0) to a(N)
C:= ListTools:-PartialSums([seq(j!, j=0..N)]):
seq(n-1+C[n+1], n=0..N); # Robert Israel, Jan 05 2015

Prog

(PARI) a(n) = n - 1 + sum(j=0, n, j! ); \\ Joerg Arndt, Jan 06 2015

Crossrefs

Cf. A036781.

Sequence in context: A138314 A115277 A130221 * A050237 A050258 A051436

Adjacent sequences: A036779 A036780 A036781 * A036783 A036784 A036785

Keyword

nonn

Author

N. J. A. Sloane

Status

approved