A013070 sin(arcsinh(x)+log(x+1)) = 2*x-1/2!*x^2-7/3!*x^3+18/4!*x^4-5/5!*x^5...

0, 2, -1, -7, 18, -5, 135, -2510, 13300, -22895, 456075, -10766650, 86950050, -224989375, 6482478275, -213120778000, 2265017781000, -5257017140375, 268111942824375, -12649162007056250, 161640657722878750

Offset

0,2

Links

Alois P. Heinz, Table of n, a(n) for n = 0..200

Mathematica

CoefficientList[Series[Sin[ArcSinh[x]+Log[x+1]], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Oct 30 2013 *)

Crossrefs

Sequence in context: A305881 A184346 A178622 * A012888 A012893 A013075

Adjacent sequences: A013067 A013068 A013069 * A013071 A013072 A013073

Keyword

sign

Author

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

Extensions

Prepended missing a(0)=0, Vaclav Kotesovec, Oct 30 2013

Status

approved