A013529 Numerator of [x^n] in the Taylor expansion exp(cosec(x) - cosech(x)) = 1 + x/3 + x^2/18 + x^3/162 + x^4/1944 + 211*x^5/51030 + ...

1, 1, 1, 1, 1, 211, 5029, 157, 6697, 439801, 375719873, 8013839, 186044689, 890107609, 1770350411, 1552280998637, 102625697881591, 76919615326361, 15912188224095499151, 25930051873454543, 1419184560088744177499, 659157886816533334709, 323645955378411578735051, 1513017447627551117359, 935339682040604214800761, 6612344442139455641066609, 36813244507954712597112169117, 112537977176478238359834596179, 45816041290074218754101655557981

Offset

0,6

Links

G. C. Greubel, Table of n, a(n) for n = 0..445

Mathematica

Numerator[CoefficientList[Series[Exp[1/Sin[x]  - 1/Sinh[x]], {x, 0, 25}], x]] (* G. C. Greubel, Nov 11 2016 *)

Crossrefs

Cf. A068917.

Sequence in context: A271979 A185719 A224101 * A229519 A289983 A212851

Adjacent sequences: A013526 A013527 A013528 * A013530 A013531 A013532

Keyword

nonn,frac

Author

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

Extensions

Name edited by R. J. Mathar, Dec 20 2011

Status

approved