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 A262376 #31 Oct 06 2015 08:27:55 %S A262376 1,1,1,4,24,139,853,5886,46198,409069,4037859,43954648,522956236, %T A262376 6749977023,93928268209,1401602636194,22324392524178,378011820620161, %U A262376 6780385526348143,128425485935180124,2561327494111820104,53652269665821260083,1177652997443428940061 %N A262376 a(n) = Sum_{k=0..n} (k! - k). %H A262376 Daniel Suteu, <a href="/A262376/b262376.txt">Table of n, a(n) for n = 0..100</a> %F A262376 a(n) = Sum_{k=0..n} k! - k. %F A262376 a(n) = A003422(n+1) - A000217(n). - _Altug Alkan_, Sep 20 2015 %e A262376 a(3) = 4, which is the following sum: (0!-0) + (1!-1) + (2!-2) + (3!-3). %t A262376 Table[Sum[k! - k, {k, 0, n}], {n, 0, 22}] (* _Michael De Vlieger_, Sep 21 2015 *) %o A262376 (Sidef) %o A262376 var sum = 0; %o A262376 range(0, 10).each { |n| %o A262376 sum += (n! - n); %o A262376 say(n, "\t", sum); %o A262376 }; %o A262376 (PARI) a(n)=sum(i=0,n,i!-i) \\ _Anders Hellström_, Sep 20 2015 %Y A262376 Partial sums of A005096. %Y A262376 Cf. A003422, A000217. %K A262376 nonn,easy %O A262376 0,4 %A A262376 _Daniel Suteu_, Sep 20 2015