|
| |
|
|
A009192
|
|
E.g.f. exp(log(1+x)*cos(x)).
|
|
0
| |
|
|
1, 1, 0, -3, -6, 15, 75, 84, -1820, -123, -10725, 475816, -3554562, 32763107, -501958275, 6877337128, -95130710792, 1486984480729, -24736452203529, 430314112493264, -7930867848273070, 154362838472661367, -3154456665148212743
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
FORMULA
| a(n)=sum(k=0..n, (sum(m=1..(n-k)/2, binomial(n,2*m)*(stirling1(n-2*m,k)*(sum(i=0..(k-1)/2, (k-2*i)^(2*m)*binomial(k,i)))*(-1)^(m))))/2^(k-1)+(stirling1(n,k))). [From Vladimir Kruchinin, Jun 29 2011]
|
|
|
PROG
| (Maxima)
a(n):=sum((sum(binomial(n, 2*m)*(stirling1(n-2*m, k)*(sum((k-2*i)^(2*m)*binomial(k, i), i, 0, (k-1)/2))*(-1)^(m)), m, 1, (n-k)/2))/2^(k-1)+(stirling1(n, k)), k, 0, n); [From Vladimir Kruchinin, Jun 29 2011]
|
|
|
CROSSREFS
| Sequence in context: A051610 A102356 A102936 * A013273 A013277 A190187
Adjacent sequences: A009189 A009190 A009191 * A009193 A009194 A009195
|
|
|
KEYWORD
| sign,easy
|
|
|
AUTHOR
| R. H. Hardin (rhhardin(AT)att.net)
|
|
|
EXTENSIONS
| Extended with signs Mar 15 1997 by Olivier Gerard.
|
| |
|
|
