OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..5000
Index entries for linear recurrences with constant coefficients, signature (10,-45,120,-210,252,-210,120,-45,10,-1).
FORMULA
a(n) = (2520*n^9 +22680*n^8 +79920*n^7 +136080*n^6 +107352*n^5 +22680*n^4 -10080*n^3 +1728*n)/9!.
G.f.: x*(x^6+72*x^5+603*x^4+1168*x^3+603*x^2+72*x+1) / (x-1)^10. - Colin Barker, May 02 2014
EXAMPLE
a(15) = (2520*(15^9) +22680*(15^8) +79920*(15^7) +136080*(15^6) +107352*(15^5) +22680*(15^4) -10080*(15^3) +1728*15)/9! = 469277384.
MATHEMATICA
Table[(2520*(n^9) + 22680*(n^8) + 79920*(n^7) + 136080*(n^6) + 107352*(n^5) + 22680*(n^4) - 10080*(n^3) + 1728*n)/9!, {n, 1, 50}] (* G. C. Greubel, Nov 22 2017 *)
PROG
(PARI) Vec(x*(x^6+72*x^5+603*x^4+1168*x^3+603*x^2+72*x+1)/(x-1)^10 + O(x^100)) \\ Colin Barker, May 02 2014
(PARI) a(n) = sum(i=1, n, binomial(i+1, 2)^4); \\ Michel Marcus, Nov 22 2017
(Magma) [(2520*n^9 +22680*n^8 +79920*n^7 +136080*n^6 +107352*n^5 +22680*n^4 -10080*n^3 +1728*n)/Factorial(9): n in [1..30]]; // G. C. Greubel, Nov 22 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
André F. Labossière, Jul 03 2003
EXTENSIONS
More terms from Colin Barker, May 02 2014
Typo in example fixed by Colin Barker, May 02 2014
STATUS
approved