A201197 E.g.f A(x) satisfies A(x) = 1 + sinh(x)*A(sinh(x)).

1, 1, 2, 7, 36, 241, 2038, 21113, 259416, 3711889, 60941194, 1132624593, 23584844132, 545415797577, 13900638671182, 387909856253257, 11785121609470896, 387841948278314657, 13764450667964758290, 524703399684950744353, 21407375104944503282620

Offset

0,3

Links

Table of n, a(n) for n=0..20.

Formula

a(n) = sum(k=1..n, (a(k-1)/(k-1)!*sum((-1)^i * (k-2*i)^n * binomial(k,i), i,0,k))/2^k), a(0)=1.

Prog

(Maxima)
a(n):=if n=0 then 1 else sum((a(k-1)/(k-1)!*sum((-1)^i*(k-2*i)^n*binomial(k, i), i, 0, k))/2^k, k, 1, n);

Crossrefs

Sequence in context: A308750 A088715 A088313 * A185754 A191493 A095793

Adjacent sequences: A201194 A201195 A201196 * A201198 A201199 A201200

Keyword

nonn

Author

Vladimir Kruchinin, Nov 28 2011

Status

approved