A181478 a(n) has generating function 1/((1-x)^k*(1-x^2)^(k*(k-1)/2)) for k=6.
1, 6, 36, 146, 561, 1812, 5552, 15372, 40677, 100562, 239316, 541926, 1188341, 2507736, 5149056, 10251560, 19935135, 37790610, 70187260, 127580310, 227779695, 399218820, 688680720, 1169024220, 1956567795, 3228473430, 5260188780, 8462889330, 13461037155
Offset: 0
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..1000
- Wikipedia, Schur Polynomial
Crossrefs
Cf. A181477.
Column k=6 of A210391. - Alois P. Heinz, Mar 22 2012
Programs
-
Mathematica
CoefficientList[Series[1/(1-x)^6/(1-x^2)^15,{x,0,30}],x]