A013432 tan(arctanh(x)-arcsin(x)) = 1/3!*x^3 + 15/5!*x^5 + 495/7!*x^7 + 29855/9!*x^9...

0, 1, 15, 495, 29855, 2874375, 404150175, 78074371375, 19828087485375, 6403087440228375, 2561659553274989375, 1243334307147747189375, 719656795107349242609375, 489659786386680109910734375

Offset

0,3

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..223

Mathematica

nn = 20; Table[(CoefficientList[Series[-Tan[ArcSin[x] - ArcTanh[x]], {x, 0, 2*nn+1}], x] * Range[0, 2*nn+1]!)[[n]], {n, 2, 2*nn, 2}] (* Vaclav Kotesovec, Feb 06 2015 *)

Crossrefs

Sequence in context: A013435 A151816 A013431 * A285765 A287070 A062752

Adjacent sequences: A013429 A013430 A013431 * A013433 A013434 A013435

Keyword

nonn

Author

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

Extensions

a(0)=0 prepended by Vaclav Kotesovec, Feb 06 2015

Definition modified by Vaclav Kotesovec, Feb 06 2015

Status

approved