cp's OEIS Frontend

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.

A374574 a(n) = Sum_{j=n..2n} j!.

This page as a plain text file.
%I A374574 #19 Jul 12 2024 19:11:39
%S A374574 1,3,32,870,46224,4037880,522956160,93928267440,22324392518400,
%T A374574 6780385526302080,2561327494111411200,1177652997443424902400,
%U A374574 647478071469567800985600,419450149241406188889984000,316196664211373618844934963200,274410818470142134209609852672000
%N A374574 a(n) = Sum_{j=n..2n} j!.
%H A374574 Alois P. Heinz, <a href="/A374574/b374574.txt">Table of n, a(n) for n = 0..224</a>
%F A374574 a(n) = a(n-1) - (n-1)! + (2*n-1)! + (2*n)! with a(0) = 1.
%F A374574 a(n) = Sum_{j=0..n} (n + j)!.
%F A374574 a(n) = A100822(2n,n).
%F A374574 a(n) = A143122(2n,n).
%p A374574 a:= proc(n) option remember; `if`(n<3, [1, 3, 32][n+1],
%p A374574      ((16*n^3-16*n^2-n+2)*a(n-1)-(n-1)*(16*n^3-20*n^2+6*n-1)
%p A374574       *a(n-2)+2*(2*n-1)*(4*n+1)*(n-1)*(n-2)*a(n-3))/(4*n-3))
%p A374574     end:
%p A374574 seq(a(n), n=0..15);
%p A374574 # second Maple program:
%p A374574 a:= proc(n) option remember; `if`(n=0, 1,
%p A374574       a(n-1) -(n-1)! +(2*n-1)! +(2*n)!)
%p A374574     end:
%p A374574 seq(a(n), n=0..15);
%Y A374574 Row sums of A143084.
%Y A374574 Cf. A000142, A100822, A143122, A296591 (the same for product).
%Y A374574 Diagonal of A054115, A211370.
%K A374574 nonn
%O A374574 0,2
%A A374574 _Alois P. Heinz_, Jul 11 2024