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

1, 4, 72, 3414, 293944, 41039354, 8367429708, 2357010259478, 874618137470928, 414021560815549234, 243310775798418308468, 173871629687917706426926, 148440940042136025757065080

Offset

0,2

Links

Table of n, a(n) for n=0..12.

Mathematica

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 *)

Crossrefs

Sequence in context: A003718 A012947 A203535 * A013102 A224900 A012995

Adjacent sequences: A013063 A013064 A013065 * A013067 A013068 A013069

Keyword

nonn

Author

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

Status

approved