A012906 Expansion of e.g.f. tanh(arcsin(x) + log(x+1)).

0, 2, -1, -13, 42, 245, -2490, -4765, 209720, -530035, -22851000, 212068925, 2756074200, -63885256825, -209294612800, 19894322342375, -99845235204000, -6458228568556375, 102934030004208000, 1969133836186414625, -73966351106066965000, -303630429195570173125

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..200

Example

2*x - 1/2!*x^2 - 13/3!*x^3 + 42/4!*x^4 + 245/5!*x^5 ...

Mathematica

Range[0, 25]! CoefficientList[Series[Tanh[ArcSin[x] + Log[x+1]], {x, 0, 25}], x] (* Vincenzo Librandi, Jul 27 2018 *)

Prog

(PARI) x = 'x + O('x^30); concat(0, Vec(serlaplace(tanh(asin(x) + log(x+1))))) \\ Michel Marcus, Jul 27 2018

Crossrefs

Sequence in context: A317384 A247601 A013020 * A013017 A012902 A087169

Adjacent sequences: A012903 A012904 A012905 * A012907 A012908 A012909

Keyword

sign

Author

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

Extensions

a(0) inserted and title improved by Sean A. Irvine, Jul 27 2018

Status

approved