A013211 arcsin(log(x+1)-sin(x))=-1/2!*x^2+3/3!*x^3-6/4!*x^4+23/5!*x^5...

0, 0, -1, 3, -6, 23, -135, 1036, -8820, 79253, -790965, 9009946, -115646454, 1626322631, -24603654075, 399276204328, -6962632196520, 130208290075961, -2596473574347177, 54889573679035678

Offset

0,4

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[ArcSin[Log[x+1]-Sin[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jun 13 2015 *)

Crossrefs

Sequence in context: A013210 A264792 A013215 * A013212 A013218 A101738

Adjacent sequences: A013208 A013209 A013210 * A013212 A013213 A013214

Keyword

sign

Author

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

Extensions

Two zeros prepended by Harvey P. Dale, Jun 13 2015

Status

approved