%I #8 Nov 01 2013 08:43:10
%S 1,2,0,-50,1400,-35222,94556,170807390,-38605204656,8791324177746,
%T -2481630462515900,912971947568647558,-429970979043182394888,
%U 249025730862440011229306,-171416914808317798189712276
%N exp(tanh(x)*arcsinh(x))=1+2/2!*x^2-50/6!*x^6+1400/8!*x^8-35222/10!*x^10...
%F a(n) ~ (-1)^(n+1) * tan(1) * 2^(2*n) * n^(2*n-1) / exp(tan(1)*Pi/2 + 2*n). - _Vaclav Kotesovec_, Nov 01 2013
%t Table[n!*SeriesCoefficient[Exp[Tanh[x]*ArcSinh[x]],{x,0,n}],{n,0,40,2}] (* _Vaclav Kotesovec_, Nov 01 2013 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|