|
%I #11 Jan 21 2023 11:51:40
%S 1,0,0,0,0,-1,-1,0,0,-1,0,1,0,0,0,1,0,0,0,1,0,-1,0,1,0,-1,1,1,-1,-1,0,
%T 0,-1,0,1,1,0,0,0,1,-1,-2,0,0,-1,-1,2,1,0,0,2,1,-1,-1,-1,0,-2,-1,1,2,
%U -1,0,2,1,-2,-1,2,-1,-1,-1,2,0,0,0,2,1,-2,-1,1,0,-4,0,2
%N Expansion of Product_{k>=0} (1 - x^(k^2+5)) in powers of x.
%H Seiichi Manyama, <a href="/A360002/b360002.txt">Table of n, a(n) for n = 0..10000</a>
%o (PARI) my(N=100, x='x+O('x^N)); Vec(prod(k=0, sqrtint(N), 1-x^(k^2+5)))
%o (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, issquare(d-5)*d)*v[i-j+1])/i); v;
%Y Cf. A276516, A359936, A359966, A359980, A360001, A360003.
%K sign,look
%O 0,42
%A _Seiichi Manyama_, Jan 21 2023
|
