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.
%I A162494 #13 Sep 08 2022 08:45:46 %S A162494 1,8,35,112,294,672,1386,2640,4718,8000,12978,20272,30645,45016,64470, %T A162494 90264,123829,166768,220849,287992,370250,469784,588833,729680,894613, %U A162494 1085880,1305640,1555912,1838523,2155056,2506798,2894688,3319268,3780640,4278429 %N A162494 Number of reduced words of length n in the Weyl group E_8 on 8 generators and order 696729600. %D A162494 N. Bourbaki, Groupes et alg. de Lie, Chap. 4, 5, 6. (The group is defined in Planche VII.) %D A162494 H. S. M. Coxeter and W. O. J. Moser, Generators and Relations for Discrete Groups, 4th ed., Springer-Verlag, NY, reprinted 1984, Table 10. %D A162494 J. E. Humphreys, Reflection Groups and Coxeter Groups, Cambridge, 1990. See under Poincaré polynomial. %H A162494 Vincenzo Librandi, <a href="/A162494/b162494.txt">Table of n, a(n) for n = 0..120</a> %F A162494 G.f.: (1-x^2)*(1-x^8)*(1-x^12)*(1-x^14)*(1-x^18)*(1-x^20)*(1-x^24)*(1-x^30)/(1-x)^8. %t A162494 CoefficientList[Series[(1 - x^2) (1 - x^8) (1 - x^12) (1 - x^14) (1 - x^18) (1 - x^20) (1 - x^24) (1 - x^30) / (1 - x)^8, {x, 0, 50}], x] (* _Vincenzo Librandi_, Jun 09 2013 *) %o A162494 (Magma) G := CoxeterGroup(GrpFPCox, "E8"); %o A162494 f := GrowthFunction(G); %o A162494 Coefficients(f); %o A162494 (PARI) Vec((1-x^2)*(1-x^8)*(1-x^12)*(1-x^14)*(1-x^18)*(1-x^20)*(1-x^24)*(1-x^30)/(1-x)^8 + O(x^121)) \\ _Jinyuan Wang_, Mar 08 2020 %Y A162494 Cf. A161409, A162493. %K A162494 nonn,fini,full %O A162494 0,2 %A A162494 _John Cannon_ and _N. J. A. Sloane_, Dec 01 2009