OFFSET
0,1
COMMENTS
It appears that for n > 1, a(n) = 0 iff n is an odd prime.
LINKS
Paul D. Hanna, Table of n, a(n) for n = 0..1000
FORMULA
G.f. A(x) = Sum_{n>=0} a(n)*x^n satisfies the following formulas.
(1) A(x) = Sum_{n=-oo..+oo} x^n * (1 + x^n)^(n^3).
(2) A(x) = Sum_{n=-oo..+oo} x^(n^4-n) / (1 + x^n)^(n^3).
EXAMPLE
G.f.: A(x) = 2 + 3*x^2 + 10*x^4 + 57*x^6 + 122*x^8 + 351*x^9 + 197*x^10 + 5215*x^12 + 374*x^14 + 25300*x^15 + 42178*x^16 + ...
PROG
(PARI) {a(n) = my(A = sum(m=-n-1, n+1, x^m * (1 + x^m +x*O(x^n))^(m^3) ) ); polcoef(A, n)}
for(n=0, 50, print1(a(n), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Sep 19 2025
STATUS
approved
