A013074 cos(arcsinh(x)+log(x+1)) = 1-4/2!*x^2+6/3!*x^3+5/4!*x^4-10/5!*x^5...

1, 0, -4, 6, 5, -10, -220, 525, 8485, -46260, -197750, -1170125, 86033725, -778687650, 1197306500, -78964192125, 3166659679625, -40031792593000, 227546036519750, -8010745066189125, 311948554085325625

Offset

0,3

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..450

Mathematica

CoefficientList[Series[Cos[ArcSinh[x]+Log[x+1]], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Nov 01 2013 *)

Crossrefs

Sequence in context: A258827 A347092 A012891 * A140384 A274929 A301915

Adjacent sequences: A013071 A013072 A013073 * A013075 A013076 A013077

Keyword

sign

Author

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

Status

approved