[go: up one dir, main page]

login
A359942
Expansion of Product_{k>=0} (1 - x^(k^3+1)) in powers of x.
2
1, -1, -1, 1, 0, 0, 0, 0, 0, -1, 1, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 1, -1, 0, 0, 0, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 1, -1, 0, 0, 0, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
OFFSET
0
LINKS
FORMULA
a(0) = 1; a(n) = -(1/n) * Sum_{k=1..n} A359943(k) * a(n-k).
PROG
(PARI) a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=-sum(j=1, i, sumdiv(j, d, ispower(d-1, 3)*d)*v[i-j+1])/i); v;
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Jan 19 2023
STATUS
approved