cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A162288 Number of reduced words of length n in the Weyl group D_11.

Original entry on oeis.org

1, 11, 65, 275, 934, 2706, 6941, 16159, 34749, 69927, 132991, 240900, 418187, 699193, 1130581, 1774058, 2709201, 4036252, 5878719, 8385597, 11733007, 16125043, 21793619, 28997122, 38017704, 49157086, 62730799, 79060850, 98466873, 121255904, 147711001, 178079011
Offset: 0

Views

Author

John Cannon and N. J. A. Sloane, Dec 01 2009

Keywords

References

  • N. Bourbaki, Groupes et Algèbres de Lie, Chap. 4, 5 and 6, Hermann, Paris, 1968. See Chap. VI, Section 4, Problem 10a, page 231, W(t).
  • J. E. Humphreys, Reflection Groups and Coxeter Groups, Cambridge, 1990. See under Poincaré polynomial.

Crossrefs

Programs

  • Maple
    # Growth series for D_k, truncated to terms of order M. - N. J. A. Sloane, Aug 07 2021
    f := proc(m::integer) (1-x^m)/(1-x) ; end proc:
    g := proc(k,M) local a,i; global f;
    a:=f(k)*mul(f(2*i),i=1..k-1);
    seriestolist(series(a,x,M+1));
    end proc;
  • Mathematica
    x = y + y O[y]^(n^2);
    (1-x^n) Product[1-x^(2k), {k, 1, n-1}]/(1-x)^n // CoefficientList[#, y]& (* Jean-François Alcover, Mar 25 2020, from A162206 *)
    x =.; n = 11; CoefficientList[ Product[1 - x^(2 k), {k, 1, n - 1}] (1 - x^n) /(1 - x)^n // Expand, x] (* Michael Somos, Aug 06 2021 *)

Formula

The growth series for D_k is the polynomial f(k)*Prod_{i=1..k-1} f(2*i), where f(m) = (1-x^m)/(1-x) [Corrected by N. J. A. Sloane, Aug 07 2021]. This is a row of the triangle in A162206.

Extensions

Entry revised by N. J. A. Sloane, Jan 17 2016