A013395 sec(sin(x)-arctanh(x))=1+90/6!*x^6+3864/8!*x^8+326214/10!*x^10...

1, 0, 0, 90, 3864, 326214, 45981276, 8451765322, 2053825164944, 641663385808078, 249042559475513572, 117658592297847708338, 66515862023755958383768, 44326271307924691256260470

Offset

0,4

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sec[Sin[x]-ArcTanh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jun 08 2017 *)

Crossrefs

Sequence in context: A013396 A013392 A013394 * A203733 A200208 A017806

Adjacent sequences: A013392 A013393 A013394 * A013396 A013397 A013398

Keyword

nonn

Author

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

Status

approved