A359942 Expansion of Product_{k>=0} (1 - x^(k^3+1)) in powers of x.

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

Seiichi Manyama, Table of n, a(n) for n = 0..10000

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

Cf. A001093, A279484, A359936, A359943.

Sequence in context: A359832 A267871 A329678 * A266434 A025447 A131078

Adjacent sequences: A359939 A359940 A359941 * A359943 A359944 A359945

Keyword

sign

Author

Seiichi Manyama, Jan 19 2023

Status

approved