A012589 cos(arcsinh(x)*exp(x))=1-1/2!*x^2-6/3!*x^3-19/4!*x^4-20/5!*x^5...

1, 0, -1, -6, -19, -20, 155, 1190, 6617, 44664, 208375, -904398, -18752699, -19097052, 694693779, -17424099810, -291885915727, 3147952642416, 73814350009583, -859299092152342, -22448554968159587

Offset

0,4

Links

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

Formula

a(n) ~ (2*cosh(Pi*cos(1)/2) * sin(n*Pi/2-1) * sin(Pi*sin(1)/2) + 2*cos(n*Pi/2-1) * cos(Pi*sin(1)/2) * sinh(Pi*cos(1)/2)) * n^(n-1) / exp(n). - Vaclav Kotesovec, Oct 31 2013

Mathematica

CoefficientList[Series[Cos[ArcSinh[x]*Exp[x]], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Oct 31 2013 *)

Crossrefs

Sequence in context: A370155 A184197 A173568 * A009048 A294313 A235537

Adjacent sequences: A012586 A012587 A012588 * A012590 A012591 A012592

Keyword

sign

Author

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

Status

approved