|
%I #10 Nov 01 2013 05:35:55
%S 1,1,1,-3,-15,-15,225,1029,-3423,-46239,58305,2582701,-3367023,
%T -223494895,750974497,31551766453,-195722347967,-6578644464703,
%U 56832659001729,1828823841664733,-19485490128305615
%N E.g.f.: exp(arcsinh(x)*cos(x))=1+x+1/2!*x^2-3/3!*x^3-15/4!*x^4-15/5!*x^5...
%F E.g.f.: (x+sqrt(1+x^2))^(cos(x)). - _Vaclav Kotesovec_, Nov 01 2013
%F a(n) ~ 2*cosh(1) * sin((n-cosh(1))*Pi/2) * n^(n-1) / exp(n). - _Vaclav Kotesovec_, Nov 01 2013
%t With[{nn=30},CoefficientList[Series[Exp[ArcSinh[x]Cos[x]],{x,0,nn}], x] Range[0,nn]!] (* _Harvey P. Dale_, Sep 09 2012 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Sep 09 2012
|
