A012793 sec(sec(x)*arcsin(x))=1+1/2!*x^2+21/4!*x^4+885/6!*x^6+67753/8!*x^8...

1, 1, 21, 885, 67753, 8319945, 1497879933, 371676224829, 121584750716497, 50703653565909009, 26255891609845966565, 16529283187035337691269, 12432784542297124704745209, 11011634249882125250110463705

Offset

0,3

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sec[Sec[x]ArcSin[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Mar 16 2013 *)

Crossrefs

Sequence in context: A238653 A041843 A041840 * A015305 A101732 A006301

Adjacent sequences: A012790 A012791 A012792 * A012794 A012795 A012796

Keyword

nonn

Author

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

Status

approved