OFFSET
0,2
FORMULA
a(n):=(-1)^n*sum(k=0..n, 4^(n-k)/(2*k+1)!*sum(i=0..2*k+1, (-1)^i*(2*k+1-2*i)^(2*n+1)*binomial(2*k+1, i))*(sum(j=1..2*k+1, j!*2^(-j)*(-1)^(k+1+j)*stirling2(2*k+1, j)))). - Vladimir Kruchinin, Jun 29 2011
PROG
(Maxima)
a(n):=(-1)^n*sum(4^(n-k)/(2*k+1)!*sum((-1)^i*(2*k+1-2*i)^(2*n+1)*binomial(2*k+1, i), i, 0, 2*k+1)*(sum(j!*2^(-j)*(-1)^(k+1+j)*stirling2(2*k+1, j), j, 1, 2*k+1)), k, 0, n); /* Vladimir Kruchinin, Jun 28 2011 */
CROSSREFS
KEYWORD
sign
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
STATUS
approved