|
%I #12 Feb 06 2015 09:03:25
%S 0,1,2,3,24,157,962,8575,88816,948025,11551682,158525499,2329270152,
%T 37012621141,638280394754,11767984017847,230953513192672,
%U 4823470878737521,106685348433700994,2489115873636707187
%N tan(exp(x)-cos(x)) = x + 2/2!*x^2 + 3/3!*x^3 + 24/4!*x^4 + 157/5!*x^5...
%F a(n) ~ n! / ((exp(r) + sin(r)) * r^(n+1)), where r = 0.814158996828781376878265969211452855533947645871032054776582... is the root of the equation exp(r)-cos(r) = Pi/2. - _Vaclav Kotesovec_, Feb 06 2015
%t With[{nn=20}, CoefficientList[Series[Tan[Exp[x]-Cos[x]], {x,0,nn}], x] Range[0,nn]!] (* _Harvey P. Dale_, Nov 24 2011 *)
%K nonn
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
