A013239 sinh(log(x+1)-tan(x)) = -1/2!*x^2 - 6/4!*x^4 + 8/5!*x^5 - 135/6!*x^6 + ...

0, 0, -1, 0, -6, 8, -135, 448, -6300, 35408, -496125, 4051168, -59471874, 643934744, -10139836707, 136494374560, -2334659166840, 37300690086560, -696737113793721, 12786540011455552, -260937837571947070

Offset

0,5

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Sinh[Log[x+1]-Tan[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 08 2012 *)

Crossrefs

Sequence in context: A069660 A119001 A324987 * A013235 A257869 A201387

Adjacent sequences: A013236 A013237 A013238 * A013240 A013241 A013242

Keyword

sign

Author

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

Status

approved