OFFSET
0,5
COMMENTS
LINKS
FORMULA
a(n+3) = 2a(n+2) - 2a(n+1) + 3a(n), a(0) = 1, a(1) = 1, a(2) = 0
a(n) = Sum(k=1..n, Sum(i=k..n, (Sum(j=0..k, binomial(j,-3*k+2*j+i)*(-2)^(-3*k+2*j+i)*3^(k-j)*binomial(k,j)))*binomial(n+k-i-1,k-1))), n > 0, a(0)=1. - Vladimir Kruchinin, May 05 2011
PROG
(Maxima)
a(n):=sum(sum((sum(binomial(j, -3*k+2*j+i)*(-2)^(-3*k+2*j+i)*3^(k-j)*binomial(k, j), j, 0, k))*binomial(n+k-i-1, k-1), i, k, n), k, 1, n); /* Vladimir Kruchinin, May 05 2011 */
(Maxima) makelist(coeff(taylor((x-1)/(-2*x^2+3*x^3+2*x-1), x, 0, n), x, n), n, 0, 32); /* Bruno Berselli, May 30 2011 */
CROSSREFS
KEYWORD
nonn
AUTHOR
Creighton Dement, Feb 11 2005
STATUS
approved