login
A013304
sech(log(x+1)-arctanh(x))=1-3/4!*x^4-90/6!*x^6-4095/8!*x^8...
0
1, 0, -3, -90, -4095, -283500, -28534275, -4001347350, -754083705375, -185224922883000, -57754322803051875, -22343321962162451250, -10514758311176393649375, -5917397284663573271062500
OFFSET
0,3
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Sech[Log[x+1]-ArcTanh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jun 06 2020 *)
CROSSREFS
Sequence in context: A103305 A097235 A047686 * A013298 A013302 A013303
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved