|
|
A305745
|
|
Expansion of Product_{k>=1} ((1 - k*x^k) / (1 + k*x^k))^k.
|
|
1
|
|
|
1, -2, -6, -4, 22, 72, 84, -32, -474, -1310, -1728, 60, 6420, 18712, 31080, 24992, -34074, -186468, -430138, -650612, -496296, 687120, 3599652, 8413968, 13374148, 12772246, -3910080, -50592280, -136089520, -244815336, -309079848, -176916784, 391358838
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
N:= 50: # for a(0) .. a(N)
f:= mul(((1-k*x^k)/(1+k*x^k))^k, k=1..N):
S:= series(f, x, N+1):
|
|
PROG
|
(PARI) N=99; x='x+O('x^N); Vec(prod(k=1, N, ((1-k*x^k)/(1+k*x^k))^k))
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|