A064321 a(n) = n*(n-1)^3*(n-2)^3*(n-3).

0, 0, 0, 0, 864, 17280, 144000, 756000, 2963520, 9483264, 26127360, 64152000, 143748000, 298995840, 584648064, 1085142240, 1926288000, 3290112000, 5433384960, 8710395264, 13600573920, 20741616000, 30968784000, 45361118880

Offset

0,5

Links

Harry J. Smith, Table of n, a(n) for n = 0..400

Index entries for linear recurrences with constant coefficients, signature (9,-36,84,-126,126,-84,36,-9,1).

Formula

G.f.: -288*x^4*(3*x^4+33*x^3+68*x^2+33*x+3) / (x-1)^9. - Colin Barker, Sep 14 2014

Example

a(4) = 4*(3^3)*(2^3)*1 = 4*27*8*1 = 864.

Maple

A064321:=n->n*(n-1)^3*(n-2)^3*(n-3); seq(A064321(n), n=0..50); # Wesley Ivan Hurt, Feb 02 2014

Mathematica

Table[n (n - 3) (n - 1)^3*(n - 2)^3, {n, 0, 50}] (* Wesley Ivan Hurt, Feb 02 2014 *)

Prog

(PARI) { for (n=0, 400, write("b064321.txt", n, " ", n*(n - 1)^3*(n - 2)^3*(n - 3)) ) } \\ Harry J. Smith, Sep 11 2009
(PARI) concat([0, 0, 0, 0], Vec(-288*x^4*(3*x^4+33*x^3+68*x^2+33*x+3)/(x-1)^9 + O(x^100))) \\ Colin Barker, Sep 14 2014

Crossrefs

Cf. A000027, A002378, A047928, A064319, A064320.

Sequence in context: A298327 A299220 A300034 * A210408 A299413 A300055

Adjacent sequences: A064318 A064319 A064320 * A064322 A064323 A064324

Keyword

nonn,easy

Author

Henry Bottomley, Sep 10 2001

Status

approved