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

0, 2, -1, 20, -54, 932, -5670, 99648, -1005704, 19127984, -273119400, 5764554528, -106046677968, 2504052726944, -55986392252336, 1478337150849408, -38674242587249280, 1136792156499528448

Offset

0,2

Links

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

Example

2*x - 1/2!*x^2 + 20/3!*x^3 - 54/4!*x^4 + 932/5!*x^5 ...

Mathematica

With[{nn=20}, Rest[CoefficientList[Series[Tan[Tan[x]+Log[x+1]], {x, 0, nn}], x]Range[0, nn]!]] (* Harvey P. Dale, Oct 06 2011 *)

Crossrefs

Sequence in context: A353914 A353873 A283620 * A013158 A012932 A013163

Adjacent sequences: A012924 A012925 A012926 * A012928 A012929 A012930

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