login
E.g.f.: exp(tan(arcsinh(x))).
2

%I #17 Oct 30 2013 09:37:21

%S 1,1,1,2,5,16,61,216,937,6400,41881,125696,259181,18156672,225924245,

%T -930421504,-25529526319,394852151296,8376428366257,-97538559528960,

%U -2542034772205739,37824762737852416

%N E.g.f.: exp(tan(arcsinh(x))).

%F a(n) ~ 4*n^(n-1) * sin(n*Pi/2 - tanh(Pi/2)) / (exp(n)*(1+cosh(Pi))). - _Vaclav Kotesovec_, Oct 30 2013

%e exp(tan(arcsinh(x))) = 1 +x +1/2!*x^2 +2/3!*x^3 +5/4!*x^4 +16/5!*x^5 ...

%t With[{nn=30},CoefficientList[Series[Exp[Tan[ArcSinh[x]]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Oct 05 2013 *)

%Y A012167(n)=A012159(2*n)

%K sign

%O 0,4

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

%E More terms from _N. J. A. Sloane_, Aug 27 2006

%E Definition clarified by _Harvey P. Dale_, Oct 05 2013