A013065 - OEIS

%I #6 Feb 07 2015 11:01:47

%S 1,4,8,214,-2120,244474,-19663636,2667954774,-459657139376,

%T 101692759589938,-27454474974890796,8721787160293603566,

%U -3104642361378992916296,1136421744211874484529546,-323876090606312632256434308,-96053520783771304241293234554

%N cosh(sinh(x)+arctan(x))=1+4/2!*x^2+8/4!*x^4+214/6!*x^6-2120/8!*x^8...

%t With[{nn=40},Take[CoefficientList[Series[Cosh[Sinh[x]+ArcTan[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Feb 07 2015 *)

%K sign

%O 0,2

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

%E More terms from _Harvey P. Dale_, Feb 07 2015