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 A022710 #9 Jul 20 2018 06:04:07 %S A022710 1,-18,135,-546,1413,-3690,13230,-40104,88452,-211502,632259,-1582488, %T A022710 3336198,-8004366,20385711,-45695742,98495865,-224701146,511583207, %U A022710 -1115983224,2374404237,-5105519238,11129154192 %N A022710 Expansion of Product_{m>=1} (1+m*q^m)^-18. %H A022710 G. C. Greubel, <a href="/A022710/b022710.txt">Table of n, a(n) for n = 0..1000</a> %t A022710 With[{nmax = 50}, CoefficientList[Series[Product[(1 + k*q^k)^-18, {k, 1, nmax}], {q, 0, nmax}], q]] (* _G. C. Greubel_, Jul 20 2018 *) %o A022710 (PARI) m=50; q='q+O('q^m); Vec(prod(n=1,m,(1+n*q^n)^-18)) \\ _G. C. Greubel_, Jul 20 2018 %K A022710 sign %O A022710 0,2 %A A022710 _N. J. A. Sloane_