A249332 a(n) = Sum_{k=0..2*n} binomial(2*n, k)^4.

1, 18, 1810, 263844, 44916498, 8345319268, 1640651321764, 335556407724360, 70666388112940818, 15220552520052960516, 3337324864503769353060, 742446552655157791828680, 167167472732516775004539300, 38021985442071415426063237704, 8723111727436784830252513497928

Offset

0,2

Links

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

Formula

a(n) = A005260(2*n).

Mathematica

Table[Sum[Binomial[2*n, k]^4, {k, 0, 2*n}], {n, 0, 30}] (* G. C. Greubel, Aug 04 2018 *)

Prog

(PARI) {a(n) = sum(k=0, 2*n, binomial( 2*n, k)^4)};
(Magma) [(&+[Binomial(2*n, k)^4: k in [0..2*n]]): n in [0..30]]; // G. C. Greubel, Aug 04 2018

Crossrefs

Cf. A001448, A005260, A006480, A050984.

Sequence in context: A067303 A055740 A072477 * A019522 A068181 A296614

Adjacent sequences: A249329 A249330 A249331 * A249333 A249334 A249335

Keyword

nonn

Author

Michael Somos, Oct 25 2014

Status

approved