%I #6 Apr 24 2017 15:13:43
%S 1,1,9,201,7921,524081,48396345,6493605561,1082018699105,
%T 246352273609441,64161902428428265,22422522791742857001,
%U 8300517886009938036049,4196071192877342442444561
%N sec(tan(arcsinh(x)))=1+1/2!*x^2+9/4!*x^4+201/6!*x^6+7921/8!*x^8...
%t With[{nn=30},Take[CoefficientList[Series[Sec[Tan[ArcSinh[x]]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Apr 24 2017 *)
%K nonn
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|