OFFSET
1,6
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (13, -78, 286, -715, 1287, -1716, 1716, -1287, 715, -286, 78, -13, 1).
FORMULA
a(n) = 1/720*n^2*(n^10 -135*n^8 +7525*n^6 -217665*n^4 +3289354*n^2 -20949480), n>=7.
G.f.: 4*x^6*(426*x^13 - 4263*x^12 + 22311*x^11 - 82449*x^10 + 220918*x^9 - 391803*x^8 + 369356*x^7 + 10716*x^6 - 382230*x^5 + 163719*x^4 + 387689*x^3 - 390831*x^2 - 87230*x - 2649)/(x-1)^13.
MATHEMATICA
CoefficientList[Series[4 x^5 (426 x^13 - 4263 x^12 + 22311 x^11 - 82449 x^10 + 220918 x^9 - 391803 x^8 + 369356 x^7 + 10716 x^6 - 382230 x^5 + 163719 x^4 + 387689 x^3 - 390831 x^2 - 87230 x - 2649) / (x - 1)^13, {x, 0, 50}], x] (* Vincenzo Librandi, Jun 01 2013 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vaclav Kotesovec, Jan 07 2011
STATUS
approved