%I #10 Nov 01 2013 08:43:13
%S 1,-6,100,-5096,523920,-90215136,23393880640,-8507435854976,
%T 4128617538965760,-2577268751229359616,2011624742314369377280,
%U -1919388801470757636909056,2197928434387448658103603200
%N arcsinh(tanh(x)*cos(x))=x-6/3!*x^3+100/5!*x^5-5096/7!*x^7...
%H Vaclav Kotesovec, <a href="/A012690/b012690.txt">Table of n, a(n) for n = 0..200</a>
%F Limit n->infinity (|a(n)|/(2*n)!)^(1/(2*n)) = 1.472999955676005806224549179660050772... - _Vaclav Kotesovec_, Nov 01 2013
%t With[{nn=30},Take[CoefficientList[Series[ArcSinh[Tanh[x]*Cos[x]],{x,0,nn}],x]Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Dec 13 2012 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|