A151614 Row sums of A156740.

1, 2, 155, 9692, 2511973, 718800326, 444293699995, 322762198901872, 375936459278442977, 517934214393739253282, 977731835276897269439162, 2156693302479983573313980822, 5955566258836615476254796252771, 18881697488276229387856391071794848

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..225

Formula

a(n) = Sum_{k=0..n} A156740(n, k).

Mathematica

A156740[n_, k_]:= Round[Product[Binomial[2*(n+j), 2*(k+j)]/Binomial[2*(n-k+j), 2*j], {j, 0, 7}]];
A151614[n_]:= A151614[n]= Sum[A156740[n, k], {k, 0, n}];
Table[A151614[n], {n, 0, 30}] (* G. C. Greubel, Jun 19 2021 *)

Prog

(Sage)
def A156740(n, k): return round( product( binomial(2*(n+j), 2*(k+j))/binomial(2*(n-k+j), 2*j) for j in (0..7)) )
def A151614(n): return sum( A156740(n, k) for k in (0..n) )
[A151614(n) for n in (0..30)] # G. C. Greubel, Jun 19 2021

Crossrefs

Cf. A156740.

Sequence in context: A157087 A332585 A000725 * A103042 A284458 A260886

Adjacent sequences: A151611 A151612 A151613 * A151615 A151616 A151617

Keyword

nonn

Author

N. J. A. Sloane, May 28 2009

Extensions

Terms a(11) onward added by G. C. Greubel, Jun 19 2021

Status

approved