A013427 - OEIS

%I #9 Jul 24 2014 03:27:48

%S 1,0,0,90,-1176,185094,530772,1636156522,170829306928,60742435952974,

%T 18173279227072940,7353969776707569554,3655980234829231451912,

%U 2065776616635942000462390,1427955074795894359873706436,1109745897830641117410245879226

%N cosh(arcsin(x)-tanh(x))=1+90/6!*x^6-1176/8!*x^8+185094/10!*x^10...

%H Vincenzo Librandi, <a href="/A013427/b013427.txt">Table of n, a(n) for n = 0..25</a>

%t With[{nn=30},Take[CoefficientList[Series[Cosh[ArcSin[x]-Tanh[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jul 23 2014 *)

%K sign

%O 0,4

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E More terms from _Harvey P. Dale_, Jul 23 2014