A012787 cos(sec(x)*arcsin(x))=1-1/2!*x^2-15/4!*x^4-345/6!*x^6-11263/8!*x^8...

1, -1, -15, -345, -11263, -455025, -16466703, 746021367, 480286325633, 150637957014303, 46203820378253425, 15313454320801213511, 5643895146092962507905, 2333857400234709586763695

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Sequence in context: A100875 A286391 A034975 * A216449 A030049 A240375

Adjacent sequences: A012784 A012785 A012786 * A012788 A012789 A012790

Keyword

sign

Author

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

Status

approved