|
| |
|
|
A134200
|
|
E.g.f. satisfies: A(x) = x*(exp(sinh(A(x)))).
|
|
1
| |
|
|
0, 1, 2, 9, 68, 725, 9942, 166453, 3290632, 75017097, 1937420010, 55906879809, 1782695466444, 62247810769053, 2362246665531326, 96806321000599725, 4260677055123222544, 200440759819510706321, 10037364633737549049042
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
LINKS
| Alois P. Heinz, Table of n, a(n) for n = 0..100
|
|
|
FORMULA
| a(n) = sum(k=1..n-1, ((sum(i=0..k, (-1)^i*(k-2*i)^(n-1)* C(k,i))) *n^k)/(2^k*k!)), a(0)=0, a(1)=1. [Vladimir Kruchinin, May 10 2011]
|
|
|
MAPLE
| A:= proc(n) option remember; if n=0 then 0 else convert (series (x* (exp (sinh(A(n-1)))), x=0, n+1), polynom) fi end: a:= n-> coeff (A(n), x, n)*n!: seq (a(n), n=0..22);
|
|
|
CROSSREFS
| (Maxima) a(n):=if n<2 then n else sum(((sum((-1)^i*(k-2*i)^(n-1) *binomial(k,i), i,0,k))*n^k)/(2^k*k!),k,1,n-1); [Vladimir Kruchinin, May 10 2011]
Sequence in context: A120020 A200248 A180747 * A038037 A138212 A134261
Adjacent sequences: A134197 A134198 A134199 * A134201 A134202 A134203
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Alois P. Heinz (heinz(AT)hs-heilbronn.de), Aug 27 2008
|
| |
|
|
