A013402 E.g.f.: cos(arcsin(x)-tan(x))=1-10/6!*x^6-392/8!*x^8-11814/10!*x^10...

1, 0, 0, -10, -392, -11814, 434412, 239703334, 66778596688, 19103113532274, 6219304575954900, 2372061571443015646, 1067602664492677013176, 566076503411492186181610, 351525681041566766571083772

Offset

0,4

Links

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

Mathematica

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

Crossrefs

Sequence in context: A222851 A013405 A013404 * A013406 A183487 A172505

Adjacent sequences: A013399 A013400 A013401 * A013403 A013404 A013405

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, May 30 2012

Status

approved