|
%I #8 Oct 31 2013 10:30:18
%S 1,2,4,-40,-688,23968,-1134784,188393088,-40676275968,10688526352896,
%T -3523678949366784,1431294964438824960,-701609173130329731072,
%U 408385401482058726547456
%N exp(arcsinh(x)*sin(x))=1+2/2!*x^2+4/4!*x^4-40/6!*x^6-688/8!*x^8...
%F a(n) ~ (-1)^(n+1) * sinh(1) * 2^(2*n) * n^(2*n-1) / exp(2*n+Pi*sinh(1)/2). - _Vaclav Kotesovec_, Oct 31 2013
%t Table[n!*SeriesCoefficient[Exp[ArcSinh[x]*Sin[x]],{x,0,n}],{n,0,40,2}] (* _Vaclav Kotesovec_, Oct 31 2013 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
