|
| |
|
|
A009256
|
|
E.g.f. exp(tan(x)^2) (even powers only).
|
|
0
| |
|
|
1, 2, 28, 872, 47248, 3907232, 454886848, 70597546112, 14042505449728, 3475021574246912, 1045247734061145088, 375054668796817221632, 158085597663328138006528, 77269840864693331267919872
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
FORMULA
| a(n)=sum(k=1..n, (sum(j=2*k..2*n, binomial(j-1,2*k-1)*j!*2^(2*n-j)*(-1)^(n+k+j)*stirling2(2*n,j)))/k!); [From Vladimir Kruchinin, Jun 06 2011]
|
|
|
MATHEMATICA
| Exp[ Tan[ x ]^2 ] (* Even Part *)
|
|
|
PROG
| (Maxima)
a(n):=sum((sum(binomial(j-1, 2*k-1)*j!*2^(2*n-j)*(-1)^(n+k+j)*stirling2(2*n, j), j, 2*k, 2*n))/k!, k, 1, n); [From Vladimir Kruchinin, Jun 06 2011]
|
|
|
CROSSREFS
| Sequence in context: A098631 A089836 A090249 * A012725 A012756 A009403
Adjacent sequences: A009253 A009254 A009255 * A009257 A009258 A009259
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| R. H. Hardin (rhhardin(AT)att.net)
|
|
|
EXTENSIONS
| Extended and signs tested Mar 15 1997 by Olivier Gerard.
|
| |
|
|