A012926 Expansion of e.g.f. arcsin(tan(x) + log(x+1)).

0, 2, -1, 12, -30, 518, -3135, 64792, -691180, 16502714, -261559125, 7121210052, -151437029370, 4664635385070, -124619795266603, 4313193388041072, -138442144387249560, 5347435223354818034, -199835788440955821417

Offset

0,2

Links

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

Example

2*x - 1/2!*x^2 + 12/3!*x^3 - 30/4!*x^4 + 518/5!*x^5 ...

Mathematica

With[{nn=20}, CoefficientList[Series[ArcSin[Tan[x]+Log[x+1]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Nov 17 2020 *)

Crossrefs

Sequence in context: A290533 A012929 A013161 * A013157 A062742 A009821

Adjacent sequences: A012923 A012924 A012925 * A012927 A012928 A012929

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