OFFSET
0,4
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..200
FORMULA
E.g.f.: exp(A(x)) where A(x) is the e.g.f. for A036770.
Recurrence: 2*a(n) = -(n-2)*(n+1)*a(n-1) + 2*(n-1)*(2*n-3)*a(n-2) + 2*(n-3)*(n-2)*(n-1)^2*a(n-3). - Vaclav Kotesovec, Aug 14 2013
a(n) ~ 2^(n/2+1/2)*n^(n-1)*exp(-n-sqrt(2))*(exp(2*sqrt(2))-(-1)^n). - Vaclav Kotesovec, Aug 14 2013
MAPLE
a:= proc(n) option remember;
`if`(n=0, 1, add((n-1)!/(n-1-2*j)! *binomial(2*j+1, j)/
(2^j) *a(n-1-2*j), j=0..(n-1)/2))
end:
seq(a(n), n=0..30); # Alois P. Heinz, Nov 23 2011
MATHEMATICA
Range[0, 19]! CoefficientList[Series[Exp[(1-(1-2x^2)^(1/2))/x], {x, 0, 19}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Geoffrey Critzer, Nov 23 2011
STATUS
approved