OFFSET
0,2
FORMULA
G.f.: A(x) = 2*(1-6*x+2*x^2+6*x^3+3*x^4)/(2-10*x-x^2)/(1-x)^2 + x*(2+x)*(1-4*x)/(2-10*x-x^2)/2*deriv(A(x)).
PROG
(PARI) {a(n)=sum(k=0, n, polcoeff(polcoeff(1/(1-x*y)+ x*(1+x-2*x^2*y)/(1-x)/(1+x+x*y+x*O(x^n)+y*O(y^k))/(1-x*y), n, x), k, y)^2)}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Feb 19 2006
STATUS
approved