|
%I #13 Nov 01 2013 11:16:56
%S 1,2,4,9,24,97,534,2975,16520,114217,1017914,8693355,66612612,
%T 641356549,8612481206,99659748575,839464647792,10015783072433,
%U 223263066398386,3322983000373651,20349154329810172
%N E.g.f.: exp(arcsinh(x)+tan(x)) = 1 + 2*x + 4/2!*x^2 + 9/3!*x^3 + 24/4!*x^4 + 97/5!*x^5 + ....
%F E.g.f.: (x+sqrt(1+x^2))*exp(tan(x)). - _Vaclav Kotesovec_, Nov 01 2013
%F a(n) ~ -2 * n^(n-1) * cos(Pi*n/2-tanh(1)) / exp(n). - _Vaclav Kotesovec_, Nov 01 2013
%t With[{nn=30},CoefficientList[Series[Exp[ArcSinh[x]+Tan[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Sep 19 2012 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Sep 19 2012
|
