OFFSET
0,3
LINKS
Paul D. Hanna, Table of n, a(n) for n = 0..2500
PROG
(PARI) /* Informal code to generate terms */
{A=[1, -1]; for(i=1, 400, A=concat(A, 0); m=sqrtint(#A-2)+1; A[#A] = -polcoeff( (1+x +x*O(x^#A))^(m^2)*Ser(A), #A-1) ; print1(#A, ", ")); A}
/* Show that the definition is satisfied: */
for(n=1, sqrtint(#A), print1(n": "); for(k=(n-1)^2+1, n^2, print1(polcoeff( (1+x+x*O(x^#A))^(n^2)*Ser(A) , k), ", ")); print(""))
CROSSREFS
KEYWORD
sign
AUTHOR
Paul D. Hanna, Jun 13 2018
STATUS
approved