|
%I #9 Oct 24 2013 16:21:32
%S 1,2,24,670,34664,2889898,355793636,60839374622,13810040271408,
%T 4019737531147986,1460034627147106108,647382654230985522694,
%U 344160751932393939417288,216083913094173247176675386
%N exp(arctanh(x)*sinh(x)) = 1+2/2!*x^2+24/4!*x^4+670/6!*x^6+34664/8!*x^8...
%F a(n) ~ 2 * (2*n-1)! * (4*n)^(sinh(1)/2) / GAMMA(sinh(1)/2). - _Vaclav Kotesovec_, Oct 24 2013
%t Table[n!*SeriesCoefficient[Exp[ArcTanh[x]*Sinh[x]],{x,0,n}],{n,0,40,2}] (* _Vaclav Kotesovec_, Oct 24 2013 *)
%K nonn
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
