|
| |
|
|
A009672
|
|
E.g.f. tan(sin(x)*exp(x)).
|
|
0
| |
|
|
0, 1, 2, 4, 24, 172, 1192, 10176, 106176, 1212048, 15123872, 210069440, 3195595392, 52434870464, 926003117184, 17548224583168, 354716499392512, 7614573123195136, 173087393243492864, 4153672167748662272
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| a(n)=2*sum(k=0..(n-1)/2, ((sum(j=1..2*k+1, j!*2^(-j)*(-1)^(j)*stirling2(2*k+1,j)))*sum(r=k..(n-1)/2, binomial(n,n-1-2*r)*((2*k+1)^(n-1-2*r)*sum(i=0..(2*k+1)/2, (2*i-2*k-1)^(2*r+1)*binomial(2*k+1,i)*(-1)^(r-i)))))/(2*k+1)!). [From Vladimir Kruchinin, Jun 13 2011]
|
|
|
PROG
| (Maxima)
a(n):=2*sum(((sum(j!*2^(-j)*(-1)^(j)*stirling2(2*k+1, j), j, 1, 2*k+1))*sum(binomial(n, n-1-2*r)*((2*k+1)^(n-1-2*r)*sum((2*i-2*k-1)^(2*r+1)*binomial(2*k+1, i)*(-1)^(r-i), i, 0, (2*k+1)/2)), r, k, (n-1)/2))/(2*k+1)!, k, 0, (n-1)/2); [From Vladimir Kruchinin, Jun 13 2011]
|
|
|
CROSSREFS
| Sequence in context: A002875 A110491 A019010 * A018988 A012587 A012292
Adjacent sequences: A009669 A009670 A009671 * A009673 A009674 A009675
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| R. H. Hardin (rhhardin(AT)att.net)
|
|
|
EXTENSIONS
| Extended and signs tested Mar 15 1997 by Olivier Gerard.
|
| |
|
|
