A013405 sec(arcsin(x)-tan(x))=1+10/6!*x^6+392/8!*x^8+11814/10!*x^10...

1, 0, 0, 10, 392, 11814, -342012, -216159814, -62908810768, -18841954586226, -6408550630546884, -2531899081824559102, -1166225397113477182936, -624827241398074401423850, -387664428610356715107061452

Offset

0,4

Links

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

Mathematica

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

Crossrefs

Sequence in context: A203774 A024136 A222851 * A013404 A013402 A013406

Adjacent sequences: A013402 A013403 A013404 * A013406 A013407 A013408

Keyword

sign

Author

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

Status

approved