This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A036782 #23 Jan 15 2021 07:43:00 %S A036782 0,2,5,12,37,158,879,5920,46241,409122,4037923,43954724,522956325, %T A036782 6749977126,93928268327,1401602636328,22324392524329,378011820620330, %U A036782 6780385526348331,128425485935180332,2561327494111820333 %N A036782 a(n) = n - 1 + Sum_{j=0..n} j!. %F A036782 a(n) = A036781(n) - 1. %F A036782 E.g.f.: exp(x-1)*(Ei(1)-Ei(1-x)) + exp(x)*(x-1) + 1/(1-x). - _Robert Israel_, Jan 05 2015 %p A036782 N:= 30: # to get a(0) to a(N) %p A036782 C:= ListTools:-PartialSums([seq(j!,j=0..N)]): %p A036782 seq(n-1+C[n+1],n=0..N); # _Robert Israel_, Jan 05 2015 %o A036782 (PARI) a(n) = n - 1 + sum(j=0, n, j! ); \\ _Joerg Arndt_, Jan 06 2015 %Y A036782 Cf. A036781. %K A036782 nonn %O A036782 0,2 %A A036782 _N. J. A. Sloane_