OFFSET
1,7
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
V. Kotesovec, Non-attacking chess pieces
FORMULA
a(n) = n^20/3628800 - n^18/8960 + n^17/6720 + 353*n^16/17280 - 53*n^15/1008 - 29467*n^14/13440 + 11867*n^13/1440 + 25901053*n^12/172800 - 107495*n^11/144 - 8467959*n^10/1280 + 122792641*n^9/2880 + 32499630031*n^8/181440 - 112903333*n^7/72 - 16042907329*n^6/6720 + 36445613711*n^5/1008 - 1784819159*n^4/300 - 9997453897*n^3/21 + 85979117831*n^2/140 + 13635070421*n/5 - 5609601346, for n>=9.
G.f.: -2*x^7*(97581*x^22 - 1758956*x^21 + 16320562*x^20 - 100734462*x^19 + 443795293*x^18 - 1471049082*x^17 + 3971393292*x^16 - 9304893422*x^15 + 17917931016*x^14 - 22612415810*x^13 + 6949925614*x^12 + 21430418050*x^11 + 9738010368*x^10 - 153051533038*x^9 + 256884162558*x^8 - 71451647970*x^7 - 265785285277*x^6 + 220345759446*x^5 + 251887022384*x^4 + 63841610284*x^3 + 5432696107*x^2 + 140661216*x + 800646)/(x-1)^21.
MATHEMATICA
Rest[CoefficientList[Series[-2*x^7*(97581*x^22 - 1758956*x^21 + 16320562*x^20 - 100734462*x^19 + 443795293*x^18 - 1471049082*x^17 + 3971393292*x^16 - 9304893422*x^15 + 17917931016*x^14 - 22612415810*x^13 + 6949925614*x^12 + 21430418050*x^11 + 9738010368*x^10 - 153051533038*x^9 + 256884162558*x^8 - 71451647970*x^7 - 265785285277*x^6 + 220345759446*x^5 + 251887022384*x^4 + 63841610284*x^3 + 5432696107*x^2 + 140661216*x + 800646)/(x-1)^21, {x, 0, 20}], x]]
CROSSREFS
Column k=10 of A193580.
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Dec 15 2012
STATUS
approved