OFFSET
4,1
LINKS
Alois P. Heinz, Table of n, a(n) for n = 4..500
S. B. Ekhad, D. Zeilberger, Computational and Theoretical Challenges on Counting Solid Standard Young Tableaux, arXiv:1202.6229v1 [math.CO], 2012
Wikipedia, Young tableau
FORMULA
See Maple program.
For n > 4, a(n) = (2*(n-5))!/(3*(n-5)!*(n+1)!)*(160*(-567 + 2394*n - 8862*n^2 + 15592*n^3 - 15484*n^4 + 9152*n^5 - 3292*n^6 + 704*n^7 - 82*n^8 + 4*n^9)). - Vaclav Kotesovec, Sep 02 2014
MAPLE
a:= proc(n) option remember; `if`(n<6, [0$3, 14, 378, 4804][n],
((-460961029024*n^4 +54902186125572*n^3 -347074341314956*n^2
+421934757637074*n +6838164520124) *a(n-1) +(104238656896016*n^4
-2317913124589048*n^3 +16535317231755832*n^2 -44274446438628908*n
+29901662719961532)*a(n-2) +(-391233321452352*n^4
+7447800734464704*n^3 -48294258553516272*n^2 +122447135865649584*n
-105955729051546080)*a(n-3)) / (286655151052*n^4 -1210962058579*n^3
+4322649356693*n^2 -24951473774234*n -30771740340558))
end:
seq(a(n), n=4..30);
MATHEMATICA
Flatten[{14, Table[(2*(n-5))!/(3*(n-5)!*(n+1)!)*(160*(-567+2394*n-8862*n^2+15592*n^3-15484*n^4+9152*n^5-3292*n^6+704*n^7-82*n^8+4*n^9)), {n, 5, 20}]}] (* Vaclav Kotesovec, Sep 02 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Aug 07 2012
STATUS
approved