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

0, 2, -1, 19, -54, 845, -5430, 87295, -918680, 16270805, -238487400, 4764161125, -88762680600, 2008590276875, -45022914664000, 1149365559242875, -29931318941628000, 855642174671233625, -25288573510727280000

Offset

0,2

Links

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

Example

2*x - 1/2!*x^2 + 19/3!*x^3 - 54/4!*x^4 + 845/5!*x^5 ...

Mathematica

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

Crossrefs

Sequence in context: A123907 A367971 A013016 * A013021 A012907 A317996

Adjacent sequences: A012898 A012899 A012900 * A012902 A012903 A012904

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