A013066 - OEIS

%I #8 Jan 24 2013 12:59:42

%S 1,4,72,3414,293944,41039354,8367429708,2357010259478,874618137470928,

%T 414021560815549234,243310775798418308468,173871629687917706426926,

%U 148440940042136025757065080

%N sec(sinh(x)+arctan(x)) = 1 + 4/2!*x^2 + 72/4!*x^4 + 3414/6!*x^6 + 293944/8!*x^8 + ...

%t With[{nn=30},Take[CoefficientList[Series[Sec[Sinh[x]+ArcTan[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jan 24 2013 *)

%K nonn

%O 0,2

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