|
%I #9 Oct 30 2013 17:06:34
%S 1,1,-7,121,-4271,262801,-25257079,3510517193,-667413187039,
%T 166471455235489,-52750545434135399,20700581434214572441,
%U -9854557734715140280207,5594838313934367657655601
%N cosh(sin(arcsinh(x))) = 1+1/2!*x^2-7/4!*x^4+121/6!*x^6-4271/8!*x^8...
%F a(n) ~ (-1)^(n+1) * sin(sinh(Pi/2)) * cosh(Pi/2) * 2^(2*n) * n^(2*n-1) / exp(2*n). - _Vaclav Kotesovec_, Oct 30 2013
%t Table[n!*SeriesCoefficient[Cosh[Sin[ArcSinh[x]]],{x,0,n}],{n,0,40,2}] (* _Vaclav Kotesovec_, Oct 30 2013 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
