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 A008632 #20 Sep 08 2022 08:44:36 %S A008632 1,1,2,3,5,7,11,15,22,30,41,54,73,94,123,157,201,252,318,393,488,598, %T A008632 732,887,1076,1291,1549,1845,2194,2592,3060,3589,4206,4904,5708,6615, %U A008632 7658,8825,10158,11651,13343,15231,17365,19735,22402,25361,28670 %N A008632 Molien series for A_9. %D A008632 D. J. Benson, Polynomial Invariants of Finite Groups, Cambridge, 1993, p. 105. %H A008632 Sean A. Irvine, <a href="/A008632/b008632.txt">Table of n, a(n) for n = 0..1000</a> %H A008632 <a href="/index/Mo#Molien">Index entries for Molien series</a> %H A008632 <a href="/index/Rec#order_41">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,0,1,-2,-1,-1,-1,2,0,1,3,-1,1,0,-3,0,-2,-1,1,-1,1,2,0,3,0,-1,1,-3,-1,0,-2,1,1,1,2,-1,0,-1,-1,1). %F A008632 G.f.: (1+x^36)/((1-x)*(1-x^2)*(1-x^3)*(1-x^4)*(1-x^5)*(1-x^6)*(1-x^7)*(1-x^8)* (1-x^9)). %p A008632 seq(coeff(series( (1+x^36)/mul((1-x^j), j=1..9)), x, n+1), x, n), n = 0..50); # _G. C. Greubel_, Feb 02 2020 %t A008632 CoefficientList[Series[(1+x^36)/Product[(1-x^j), {j,1,9}], {x,0,50}], x] (* _G. C. Greubel_, Feb 02 2020 *) %o A008632 (PARI) Vec( (1+x^36)/prod(j=1,9, 1-x^j) +O('x^50) ) \\ _G. C. Greubel_, Feb 02 2020 %o A008632 (Magma) R<x>:=PowerSeriesRing(Integers(), 50); Coefficients(R!( (1+x^36)/(&*[1-x^j: j in [1..9]]) )); // _G. C. Greubel_, Feb 02 2020 %o A008632 (Sage) %o A008632 def A008631_list(prec): %o A008632 P.<x> = PowerSeriesRing(ZZ, prec) %o A008632 return P( (1+x^36)/product(1-x^j for j in (1..9)) ).list() %o A008632 A008631_list(70) # _G. C. Greubel_, Feb 02 2020 %K A008632 nonn,easy %O A008632 0,3 %A A008632 _N. J. A. Sloane_ %E A008632 More terms from _Sean A. Irvine_, Apr 01 2018