A013368 sech(sin(x)-arctan(x))=1-10/6!*x^6+1288/8!*x^8-152934/10!*x^10...

1, 0, 0, -10, 1288, -152934, 22044484, -4128980986, 1002646613616, -309256569835534, 118408798212804028, -55134457643443006338, 30684616930799120314216, -20117431906536006109520470

Offset

0,4

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sech[Sin[x]-ArcTan[x]], {x, 0, nn}], x]Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jan 31 2013 *)

Crossrefs

Sequence in context: A013367 A013366 A013364 * A317012 A160104 A361495

Adjacent sequences: A013365 A013366 A013367 * A013369 A013370 A013371

Keyword

sign

Author

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

Status

approved