OFFSET
0,2
LINKS
Robert Israel, Table of n, a(n) for n = 0..3000
MAPLE
N:= 30: # for a(0)..a(N)
P:= mul(1-m*q^m, m=1..N):
S:= series(P, q, N+1):
S15:= series(S^(-15), q, N+1):
seq(coeff(S15, q, i), i=0..N); # Robert Israel, Dec 22 2019
MATHEMATICA
nmax = 20; CoefficientList[Series[Product[1/(1 - k*x^k)^15, {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Dec 23 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved