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 A022740 #17 Jul 08 2025 17:10:27 %S A022740 1,16,168,1376,9604,59488,335904,1758816,8646986,40281296,179065184, %T A022740 763837600,3140732344,12494160288,48236274976,181203877248, %U A022740 663837626163,2376282980272,8325497904672 %N A022740 Expansion of Product (1-m*q^m)^-16; m=1..inf. %H A022740 Robert Israel, <a href="/A022740/b022740.txt">Table of n, a(n) for n = 0..3000</a> %p A022740 N:= 30: # for a(0)..a(N) %p A022740 P:= mul(1-m*q^m,m=1..N): %p A022740 S:= series(P,q,N+1): %p A022740 S16:= series(S^(-16),q,N+1): %p A022740 seq(coeff(S16,q,i),i=0..N); # _Robert Israel_, Dec 22 2019 %t A022740 nmax = 20; CoefficientList[Series[Product[1/(1 - k*x^k)^16, {k, 1, nmax}], {x, 0, nmax}], x] (* _Vaclav Kotesovec_, Dec 23 2019 *) %Y A022740 Cf. A006906, A022611, A022644, A023014. %Y A022740 Column k=16 of A297328. %K A022740 nonn %O A022740 0,2 %A A022740 _N. J. A. Sloane_