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 A266784 #20 Feb 12 2024 13:26:13 %S A266784 1,5,14,30,55,92,144,214,305,419,559,729,933,1173,1451,1771,2137,2552, %T A266784 3018,3537,4111,4744,5441,6205,7037,7940,8919,9977,11116,12338,13646, %U A266784 15043,16533,18120,19805,21590,23480,25480,27592,29817,32158,34618,37200,39908,42745,45713,48815,52056,55439,58965,62637,66459,70434,74564,78852,83301 %N A266784 The growth series for the affine Weyl group F_4. %D A266784 N. Bourbaki, Groupes et Algèbres de Lie, Chap. 4, 5 and 6, Hermann, Paris, 1968. See Chap. VI, Section 4, Problem 10b, page 231, W_a(t). %D A266784 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 A266784 J. E. Humphreys, Reflection Groups and Coxeter Groups, Cambridge, 1990. See under Poincaré polynomial; also Table 3.1 page 59. %H A266784 G. C. Greubel, <a href="/A266784/b266784.txt">Table of n, a(n) for n = 0..1000</a> %H A266784 <a href="/index/Rec#order_24">Index entries for linear recurrences with constant coefficients</a>, signature (1, 0, 0, 0, 1, -1, 1, -1, 0, 0, 1, -2, 1, 0, 0, -1, 1, -1, 1, 0, 0, 0, 1, -1). %F A266784 G.f.: (1+t)*(1+t+t^2+t^3+t^4+t^5)*(1+t+t^2+t^3+t^4+t^5+t^6+t^7)*(1+t+t^2+t^3 +t^4+t^5+t^6+t^7+t^8+t^9+t^10+t^11)/((1-t)*(1-t^5)*(1-t^7)*(1-t^11)). %F A266784 G.f.: (1-x^2)*(1-x^6)*(1-x^8)*(1-x^12)/((1-x)^5*(1-x^5)*(1-x^7)*(1-x^11)). - _G. C. Greubel_, Feb 04 2020 %p A266784 m:=30; S:=series((1-x^2)*(1-x^6)*(1-x^8)*(1-x^12)/((1-x)^5*(1-x^5)*(1-x^7)*(1-x^11)), x, m+1): seq(coeff(S, x, j), j=0..m); # _G. C. Greubel_, Feb 04 2020 %t A266784 CoefficientList[Series[(1-x^2)*(1-x^6)*(1-x^8)*(1-x^12)/((1-x)^5*(1-x^5)*(1-x^7)*(1-x^11)), {x,0,60}], x] (* _G. C. Greubel_, Feb 04 2020 *) %o A266784 (PARI) Vec( (1-x^2)*(1-x^6)*(1-x^8)*(1-x^12)/((1-x)^5*(1-x^5)*(1-x^7)*(1-x^11)) +O('x^60) ) \\ _G. C. Greubel_, Feb 04 2020 %o A266784 (Magma) R<x>:=PowerSeriesRing(Integers(), 60); Coefficients(R!( (1-x^2)*(1-x^6)*(1-x^8)*(1-x^12)/((1-x)^5*(1-x^5)*(1-x^7)*(1-x^11)) )); // _G. C. Greubel_, Feb 04 2020 %o A266784 (Sage) %o A266784 def A077952_list(prec): %o A266784 P.<x> = PowerSeriesRing(ZZ, prec) %o A266784 return P( (1-x^2)*(1-x^6)*(1-x^8)*(1-x^12)/((1-x)^5*(1-x^5)*(1-x^7)*(1-x^11)) ).list() %o A266784 A077952_list(60) # _G. C. Greubel_, Feb 04 2020 %Y A266784 For the growth series for the finite group see A162496. %K A266784 nonn %O A266784 0,2 %A A266784 _N. J. A. Sloane_, Jan 11 2016