|
Search: id:A129452
|
|
|
| A129452 |
|
Generating function in rational polynomials from Billey-Warrington paper for q=3:p(x, q) = (-1 + q^2*x^2 + q^3*x^3)/((1 + q*x + q^2*x^2)*(-1 + x + q*x + q^2*x^2 + q^2*x^3 - q^4*x^4)). |
|
+0
1
|
|
| 1, 1, 4, 61, 208, 1093, 7198, 35560, 193450, 1089772, 5837140, 31840051, 174564403, 949080799, 5176371973, 28253599486, 154003756249, 839880083245, 4580937825271, 24980164298164, 136230227328730, 742951002036193
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
REFERENCES
|
Sara Billey, Gregory Warrington,Kazhdan-Lusztig Polynomials for 321-hexagon-avoiding permutations, J. of Algebraic Combinatorics, page 132; http://www.math.washington.edu/~billey/
|
|
FORMULA
|
a(n) =Expansion of((-1+q^2*x^2+q^3*x^3)/((1+q*x+q^2*x^2)*(-1+x+q*x+q^2*x^2+q^2*x^3-q^4*x^4))) for q=3
|
|
MATHEMATICA
|
p[x_, q_] = (-1 + q^2*x^2 + q^3*x^3)/((1 + q*x + q^2*x^2)*(-1 + x + q*x + q^2*x^2 + q^2*x^3 - q^4*x^4)); Table[ SeriesCoefficient[Series[p[x, 3], {x, 0, 30}], n], {n, 0, 30}]
|
|
CROSSREFS
|
Sequence in context: A136385 A071582 A158300 this_sequence A131014 A118005 A132064
Adjacent sequences: A129449 A129450 A129451 this_sequence A129453 A129454 A129455
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 08 2007
|
|
|
Search completed in 0.002 seconds
|
