|
%I #9 Oct 30 2013 17:10:15
%S 1,3,49,1915,143905,17011475,2994791825,719040113675,229441987074625,
%T 92824148885459875,46824601078366320625,28633111489683067566875,
%U 20964654070778933185750625,18047023186844734022903421875
%N arctanh(tan(arcsinh(x))) = x+3/3!*x^3+49/5!*x^5+1915/7!*x^7+143905/9!*x^9...
%F a(n) ~ (2*n)! * 2^(2*n+1) * exp((2*n+1)*Pi/4) / (exp(Pi/2)-1)^(2*n+1). - _Vaclav Kotesovec_, Oct 30 2013
%t Table[n!*SeriesCoefficient[ArcTanh[Tan[ArcSinh[x]]],{x,0,n}],{n,1,40,2}] (* _Vaclav Kotesovec_, Oct 30 2013 *)
%K nonn
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
