|
EXAMPLE
|
From the table of powers of A(x), we see that
2^n+1 = Sum of coefficients [x^0] through [x^n] in A(x)^n:
A^1=[1,2],-2,4,-12,40,-144,544,-2128,8544,...
A^2=[1,4,0],0,-4,16,-64,256,-1040,4288,...
A^3=[1,6,6,-4],0,0,-8,48,-240,1120,-5088,...
A^4=[1,8,16,0,-8],0,0,0,-16,128,-768,...
A^5=[1,10,30,20,-20,-8],0,0,0,0,-32,...
A^6=[1,12,48,64,-12,-48,0],0,0,0,0,0,...
A^7=[1,14,70,140,56,-112,-56,16],0,0,0,...
A^8=[1,16,96,256,240,-128,-256,0,32],0,0,...
the main diagonal of which equals:
[x^n]A(x)^(n+1) = (n+1)*A009545(n+1) for n>=0.
|
|
PROGRAM
|
(PARI) {a(n)=if(n==0, 1, (2^n+1-sum(k=0, n, polcoeff(sum(j=0, min(k, n-1), a(j)*x^j)^n+x*O(x^k), k)))/n)} (PARI) {a(n)=if(n==0, 1, if(n==1, 2, if(n==2, -2, (-2*(2*n-3)*a(n-1)+4*(n-3)*a(n-2))/n)))} (PARI) {a(n)=polcoeff( (1+2*x+sqrt(1+4*x-4*x^2+x^2*O(x^n)))/2, n)}
(PARI) a(n)=polcoeff((1+2*x+sqrt(1+4*x-4*x^2+x*O(x^n)))/2, n)
|