|
%I #15 Aug 25 2012 14:29:19
%S 1,1,1,2,5,32,157,688,3817,29952,257049,1922560,15886125,160364544,
%T 1844058101,19815696384,218349214545,2743045259264,38729647296945,
%U 538516252917760,7468216325125589,112957538226929664,1882371895493492429
%N E.g.f.: exp(tanh(x)/cos(x)).
%t With[{nn=30},CoefficientList[Series[Exp[Tanh[x]/Cos[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Aug 25 2012 *)
%o (PARI) for(n=1,#t=Vec(exp(tanh(x)/cos(x))),print1((n-1)!*t[n]",")) \\ - _M. F. Hasler_, Aug 25 2012
%K nonn
%O 0,4
%A _R. H. Hardin_
%E Extended and formatted by _Olivier Gérard_, Mar 15 1997
%E Definition clarified by _Harvey P. Dale_, Aug 25 2012
|
