%I #15 Jun 21 2015 21:50:29
%S 1,1,0,2,-4,26,-134,930,-6728,53056,-413744,2752936,-3042040,
%T -488089848,16658828096,-442856699584,11075864697536,-274957302952960,
%U 6922538197811392,-178529204224920384,4739350807332125056
%N Expansion of exp(tan(log(1+x))).
%t With[{nn=30},CoefficientList[Series[Exp[Tan[Log[1+x]]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Oct 26 2011 *)
%K sign,easy
%O 0,4
%A _R. H. Hardin_
%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997